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FOREWORD 


The latest edition of flowcharts, table of contents and foreword to update the Colossus 
2C (Rev 0) APOLLO Guidance and Navigation Flowcharts to Colossus 2D (Rev 1) 
are enclosed within. Remove FC- 2595 from existing volume, as it is no longer 
part of program Colossus. Remove FC- 2682 and FC-2710 since they are not accurate 
for Colossus 2D. Flowchartsnot yetcompleted or included within the current edition 
are denoted by an asterisk on the table of contents. The index to the present volume 
is an alphabetical listing of flag bits, subroutines, and major entries. In addition 
to the flowchart and sheet number for each entry, the index gives the flowchart and 
sheet number where each flag bit is set (S), cleared (C), or tested (T). 
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BMAG X , 8MAGY A 
BMA6I 


0 SPECIAL MARK 


SUBROUTINE DOWNFLAG 
CMC CONTROL 


SUBROUTINE UPACTOFF 
TURN OFF UPLINK 


SUBROUTINE DOWNFI 


SUBROUTINE DOWNFLAG 
OPTION TWO FOR MARKRUPT 
FLAG 



FRESH START AND RESTART 
COLOSSUS 


FC-2020 
















SET UP APPROPRIATE DOWNLIST / 
CONTAINS O, 1, 2, 3 OR 4 WHIG 
BE USED AS AN INDEX IN 
DOWN-TELEMETRY PROGRAM 1 
SELECT DOWNLIST ADDRESS 


INITIALIZED TO PREVENT THE 
OLD DISPLAY DURING SUBSEQUENT 
RESTARTS (DUE TO BIT 4). ASSURES 




ARE BOTH THE KEYED-IN MAJOf 
MODE (MMNUMBER) AND THE 
CURRENT MAJOR MODE (MODREB] 


b ; s t Jr o d^ 


[-*> FC-2020 


















































































RETURN TO CALLER OF NEWMOOEX 

CALLING, SEQUENCE OR AT ,5l*l OF NEWMODEA 
CALLING, SEQUENCE 


! PH/V5E TABLE 

. 1 ADBc*^ maintenance 




* /LkJz. 


FC : e030 


























«; MAINTENANCE 
’ | colo-ku-s n FC . 2.030 














































RESTART.) 


] PUT +0 INTO VAC AREA’S VACUSE REGISTER, 

LOW 9 OF NCWPRlO -ADDRESS OF VACUSE RE6I5TER+ 1. 























































PROGRAM CONSTANTS 


MEANING 

T OF A CCS PRIORITY INSTRUCTION. 
)EX VALUE IN EJSCAN 

S SIZE OF A CORESET 

fG FOR THE EXECUTIVE 

) BE LOADED INTO PRIORITY, IN LIEU 

INDEXING CORESETS. . 


















































































SHIFTING OF ADDRESSES OF THE TASKS 
IN THE LST2 LIST IS DONE IN THE SAME 
MANNER AS THE TIME DATA WAS SHIFT¬ 
ED IN THE LST1 LIST. 


RETURN TO CALLING SEQUENCE 
afi+2 WHERE ae=TC TWIDDLE, 
rf+3 WHERE ae=TC WAITLIST 
OR GO TO TASKOVER ON SHEET 18 
IF ENTERED VIA FIXDELAY OR VARDELAY 
















ERED FROM 73 
ATI 0 N S DIRECTLY. 



AITLIST 

JS ■ FC-2060 

~'-n is I 3 4"' 
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NTERBM'IK COMMUNtCKTION 
colossus s. FC-2080 



















RTB OP CODES 


LOADTIME Sh. 2 

CDULOGIC Sh. 3 

READPIPS Sh. 4 

SGNAGREE Sh. 5 

1ST02S Sh. 5 

V1ST02S Sh. 6 

2V1ST02S Sh. 7 

1T02SUB Sh. 8 

INCRCDUS Sh. 9 

CDUINC Sh. 10 

PULSEIMU Sh. 12 

VECSGNAG Sh. 12 

TRANSP1 Sh. 13 

TRANSP2 Sh. 13 

SIGNMPAC Sh. 14 

NORMUNXL Sh. 15 

NORMUNIT Sh. 15 
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[loadtime 


-TIME 2, TIME 1 111 csec « 2 


^ SLOAD 2 ^ 


MPAC +1<- 
MPAC+ 2<& 


^newmode) 

I 


v DANZIG 


Store current time 


t 0 Declare MPAC in d p mode 
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COLOSSUS 2D 






Converts the single precision 2's 
complement number arriving in 
MPAC in revs @ 2" 1 to a dp l's o 
complement number in revs @2° 



I Change scaling and 

1PAC, MPAC +1 <r- (MPAC, MPAC +1) + 2 1, A | convert to l's comp! 



^ \'J2/A RTB Op Codes 






(readpips) 


Reads the PIPA's into MPAC 
without changing them 













(sgnagree) 


/tpagreleA, 

/ Force sign 
( agreement 
\ in MPAC t 
\FC-2090~ 


Forces sign agreement 
in MPAC t 


1 to 2 SUB \ 
’’Convert the d. p. 
i's complement 
angle to a single 

Sh. 8 


Converts the d. p. I's complement 
angle in revs ^ 2° to a single pre¬ 
cision 2's complement angle in 


Input: 

MPACd = I'S complement angle 
in revs 2° 

Output: 

A = MPAC = 2's complement 
angle in revs ^ 2 1 


0 


(newmode) 


Declare MPAC in d. p. mode 


Return 

via 

DANZIG 
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(yiSTQ2S ) 


Converts (on 3 angles) the d. p. l's comple¬ 
ment angles in revs 2° to single pre¬ 
cision 2's complement angles in revs 2'1 


/Convert 1st angle 
/from d p. l's comple- \ Output: 
vment to single precisi— - * 

\2's complement 


MPAC d <-(MPAC +5 ) d I Put 3rd an § le int0 mpac d 

Save 1st angle result in (MPAC +5) D 


/ 1TQ2SUB 


' from dp. l'scomple 
\ment to single precision. 
\2's complement 
\ Sh. 8 


Input: 

MPACjj = 3rd l's complement 
angle in revs 2° 

Output: 


[MPAC +2 Save 3rd angle result in MPAC +2 

(MPAC +3) d Put 2nd angle into MPAC D 


Convert 2nd angle \ 
from dp. l's comple- ' 
ment to single precision, 
2's complement / 


Input: 

MPACp) = 2nd l's complement 
angle in revs @ 2° 

' Output: 

A = MPAC = 2's complement 
angle in revs @ 2"2 


Save 2nd angle result in MPAC +1 
Put 1st angle result into MPAC 
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From Preceding Sheet 






From Preceding Sheet 


(^SLOAD2 ) 


MPAC < 
MPAC +1«- 
MPAC +2 


Store 1st angle result in 
MPAC and store 2nd angle 
result in MPAC +1 


Add 1 low-order 
bit to negative 

complement to 
form 2's complement 


(newmode) 


Declare MPAC in d. p. mode 



Fix "overflow 
corrected" 


A<- NEGMAX+MPAC 
IMP AO«-NBGMAX+MPAC 


Restore 1 to bit 15 
Lost if overflow 
NEGMAX=40000 8 
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/ Increment THETAD\ 
in 2's complement by ' 

\ l's complement I 

quantity in A / 
Sh. 10 7 


Input: A = MPAC 

BUF = Address of quantity to be incremented 
(here = address of THETAD) 

Result: ADR' 1 (BUF) = THETAD incremented 
in 2's complement by l's complement quantity 
in MPAC 


/increment THETAdX 
/+1 in 2's complement by \ 
\ l's complement / 
\ quantity in A / 


Input: A = MPAC +3 

BUF = address of quantity to be incremented 
(here address of THETAD +1) 

Result: ADR' 1 (BUF) = THETAD +1 incremented 
in 2's complement by l's complement quantity 
in MPAC +3 


/ CDUINC \ Input: A = MPAC +5 

r - : -\ BUF = address of quantity to be incremented 

' Increment THETAD \ (here = address of THETAD +2) 

+2 in 2's complement by> Result . ADR" 1 (BUF) = THETAD +2 incremented 
l's complement / ^ 2 ' s complement by l's complement quantity 

\ quantity in A / in MPA C +5 
\ Sh 10 / 







From Preceding Sheet 


(Vecmode) 

I 

(VMODE J 




I 


(newmode) 

I -- 

[ MODE- *- - -1 I Declare THETAD in vector mode 


Return 
DANZIG / 


C 


Increments in 2's complement the register 
whose address is in BUF by the l's comple¬ 
ment quantity which arrives in A 



l's complement increment value 
arrives in A and is stored in TEM2 


Change 2's complement angle 
whose address is stored in 
BUF to l's complement by 
subtracting 1 low-order bit 
if negative (< -0) 


|a<-ADR - 1 (BUF) - lj 


[A**—A + TEM2 Increment by input value 

Next Sheet__ 
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Replaces a 3 x 3 matrix 11 
d.p. with the transpose ir 


(XNB +2) d -«- (XNB +6 ) d 

(XNB +4) d < (XNB +12D) d 

(XNB +10D) D -f-(XNB +14 D) d 



1 _ 

(XNB1 +2)fJ-(XNB1 +6 ) d 

(XNB1 +4)g-(XNB1 +12 D) d 

(XNB1 +10D) d «-(XNB1 +14D) d 




/(text' _ \ 'Mn RTB Op Codes 


- DOCUMENT NC 

rrd colossus 2D fc-2ioo 
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Performs unit operation but also 
works for very small vectors 

s -\ (high-order half = 0) S \ 

(NORMUNXl) ^NORMUNny 


/ Forces sign \ 
/agreement in each \ 
V:omponent of MPACy / 


Test 1st component (high-order half) 


Test 2nd Component (high-order half) 


Test 3rd component (hlgh-oi 


Shifts each com- ---*-■ 

ponent left 13 bits MPACn MPACn + (MPAC +1) • 2" 1 

if most significant u u 

part of each of the (MPAC +3)^ (MPAC + 3 )j-j + 

3 d. p. vectors = 0 (MPAC+4) • 2' 1 

(MPAC +5) D t-(MPAC +5 ) d + 
a< l_15 (MPAC +6) • 2' 1 


'■u/if I RTB Op Codes 


COLOSSUS 2D 





SUBROUTINES CALLED WHICH ARE 
FLOWED ON OTHER FLOWCHARTS 


Subroutine 

Name 

Where 

Flowed 

Description 

Where 

Called 

IMUPULSE 

FC-2210 

Torques gyros 

Sh. 12 

TPAGREE 

FC-2090 

Forces sign agreement in MPAC T 

Sh. 5 

UNIT 

FC-2090 

Performs unit operation 

Sh. 16 

VECAGREE 

FC-2090 

Forces sign agreement in each component 
of MPAC y 

Sh. 12, IE 
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Single Precision Subroutines 


SPCOS Sh. 2 

SPSIN Sh. 2 















Preceding Sheet 



A JTKMK 
arg = angle 
larg1<90° 















































































ALARM AND ABORT 


The alarm routine and its associated entries are used for setting the alarm 
code into one of the FAILREG registers. It turns on the program alarm light (by 
setting bit-position 9 of register DSPTAB+11D to one). The alarm code (or codes) 
is then available for display. Also, the 2CADR of the location where the alarm 
condition occurred is set into the ALMCADR registers so it is available for display. 

There are three FAILREG registers for storing alarm codes. The first 
alarm code is set into registers FAILREG and FAILREG+2. The second alarm 
code is set into registers FAILREG+1 and FAILREG+2. The last (3rd or more) 
is set into register FAILREG+2. Subsequent alarm codes (3rd or more) will 
replace the existing alarm code in register FAILREG+2. This will continue as 
additional alarm conditions are encountered until the operator depresses the error 
light reset key. Before depressing this key, the operator will normally key in verb 
05 and noun 09, which will cause the contents of all three of the FAILREG registers 
to be displayed so that the operator can determine the type of alarm condition from 
the alarm code (see Table of Alarm Codes versus Alarm Conditions, etc. 
on sheet 6) and can respond with appropriate action. If further information is 
necessary, the operator will also key in verb 05 and noun 08, which will cause the 
contents of registers ALMCADR, ALMCADR+1 and ERCOUNT to be displayed. 

The operator can then determine the location of the alarm condition from the 
2CADR in registers ALMCADR and ALMCADR+1 and determine the number of 
errors detected in the self check program (since fresh start) from the count in 
register ERCOUNT. These errors are identified by alarm code OCT 1102. 

Depressing the error light reset key will clear registers FAILREG and FAILREG+1 
and turn off the program alarm light. A fresh start will also do this and clear 
FAILREG+2 in addition. Registers ALMCADR and ALMCADR+1 are never cleared 
to zero. Their contents are replaced each time an alarm condition occurs. Register 
ERCOUNT is cleared to zero only during fresh start. Each time an error is 
detected by self check, register ERCOUNT is incremented by one. 

Alarm conditions are due to program failures (not hardware failures). If 
the failure is not serious, control returns to the calling sequence. If the failure is 
serious, no return is made, and an abort is made resulting in a software restart. 
Failures which are not serious use the following entries: PRIOLARM, VARALARM, 
CURTAINS, ALARM and ALARM2. Failures which are serious use the following entries 
BAILOUT, POODOO, and CCSHOLE. 
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Each entry will make the alarm code available for display and turn on the 
program alarm light (if off). Only entry PRIOLARM will display the alarm codes 
in the three FAIL REG registers. The return location and the location containing 
the alarm code is given in the calling sequence for each entry shown below. 

Besides turning on the program alarm light (if off) and making the alarm code 
available for display, other functions of each entry are: 


PRIOLARM 

Displays the alarm codes via PRIODSPR 
(V05N09) and returns. Used by the "target 
out of view" alarm condition. 

VARALARM 

Calling sequence obtains a variable alarm 
code from an applicable register. Returns to 
calling sequence. 

CURTAINS 

Alarm code OCT 217 is only one used. Used 
for bad returns from stall routines. Returns 
to calling sequence. 

ALARM 

Used for alarm conditions such as improper 
input data, etc. Returns to calling sequence. 

BAILOUT 

Terminates in a software restart. Used by 
alarm conditions such as no vac areas 
available, too many tasks, etc. 

POODOO 

Clears AVEGFLAG and V37FLAG. Inactivates 
all restart groups and terminates in a software 
restart, and GOTOPOOH and flash verb 37 for 
operator to select new major mode. Used by 
alarm conditions such as an attempt to take 
the square root of a negative number, illegal 
flashing display, etc. 

CCSHOLE 

Alarm code OCT 21103 is only code used. 

Clears AVEGFLAG and V37FLAG, inactivates 
all restart groups and terminates in a software 
restart, and GOTOPOOH and flash verb 37 for 
operator to select new major mode. Used 
when unused CCS branch is executed. 

ALARM2 

Alarm code OCT 1102 is only code used. Used 
only by self check program when an error is 
detected. 
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Two Of The Five 

Non-Abortive Entries with Return 


Displays Alarm Code 
From location R52L+5 of P51-P53 
via BANKCALL with A = ALARM 
code. [BUF2, BUF2+l] = 2CADR 
of *1+2 


From 3 locations with A = alarm code 


Calling sequence 
X+0 TC VARALARM 
X +1 Return 


Calling sequence 
X +0 TC 
X +1 CADR 


X +4 
X +5 


BANKCALL 

PRIOLARM 

TERMINATE 

PROCEED 

ENTER 

IMMEDIATE RETURN 



Inhibit 


Alarm Code 


ALMCADR Q I 


Q = X +1 
(Return Address) 



Note: Symbol " = " means "contains" in this flow chart. 

* The address stored in register ALMCADR is not used as a return address for 
these entries (PRIOLARM, ALARM, ALARM2 via self check, BAILOUT POODOO 
and CCSHOLE) while the other two entries (VARALARM and CURTAINS) do use the 
address as a return address. However, the address associated with each entry in 
register ALMCADR and its BBCON in register ALMCADR+1 and the contents of 
register ERCOUNT are available for display by verb 05 and noun 08. 
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Three of the five 

Non-Abortive Entries with Return 


From 6 locations 
Calling sequence 
X + o TC CURTAINS 
X + 1 Return 

One Alarm Code 
(OCT 0217) in 
CUR TAINS +3 

(curtains) 


From 41 locations 
Calling sequence 
X +0TC ALARM 
X + 1 OCT CODE 
X + 2 Return 


Entered from location 
TCALARM2 of self 
check program with A = 
address of failure 
location 
Calling sequence is: 

- ' ~ TC ALARM2 

OCT 01102 .- 

Return | A ■ 


Inhibit 

inter- 


jj ' 


The Alarm Code for 
ALARM2 entry from 
self check is in location 
TCALARM2 +1 
and is OCT 01102 


The Alarm Code 
for CURTAINS 
entry is in 

location CURTAINS+3 
and is OCT 0217 



Return address 
2J for CURTAINS 
(not used by 
ALA RM *) 

f + 1 = Alarm Code where 
( * TC ALARM2, 

TC ALARM2 or 
TC ALARM 

<is TCALARM2, CURTAINS 
2 or any of 41 locations) for 
entries ALARM 2, CURTAINS 
•r ALARM, respectively. 



J he ^dress stored in register ALMCADR is not used as a return address for these 
£P OLARM ’ ALARM - ALARM2 via self check, BAILOUT, POODOO and 
CCbHOLE) while the other two entries (VARALARM and CURTAINS) do use the 

a A S r address. However, the address associated with each entry in 

register ALMCADR and its BBCON in register ALMCADR +1 and the contents of 
register ERCOUNT are available for display by VERB 05 and NOUN 08 
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Abortive Entries Ending in Restart 


Calling sequence 

a? + 0 TC BAILOUT 

J? + 1 OCT CODE 

No Return 


From 7 locations 
Calling sequence 
^ + 0 TC POODOO 
X+ 1 OCT CODE 

No Return 


From 18 locations 
Calling sequence 
£ + 0 TC CCSHOLE 
No Return 
One Alarm Code (OCT 
21103) in CCSHOLE+3 



. ._at MPADR is not used as a return address for 

The address stored m^'egmter^^LMCADR^ ^ check BAILOUTj poODOO 

SrSHOLE) Seth?lthtrtwo entries (VARALARM and CURTAINS) do use the 
a HH^ss S a?areUTrn address. However, the address associated with each entry in 
register ALMCADR and its BBCON in register ALMCADR.land the contents of 
register ERCOUNT are available for display by verb 05 and noun 08. 
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PRIOENT 




From Preceding Sheet 



| ITEMP1 Q | 


Return Address to either the entry calling 
sequence or the BORTENT (or PRIOENT) 
calling sequence. ITEMP1 contains one of 
the following Return Addresses depending 
upon which entry was used: 


ITEM PI 
ITEM PI 
ITEM PI 
ITEM PI 
ITEM PI 
ITEM PI 

ITEM PI 


PRIOLARM+6 

VARALARM+5 

CURTAINS+3 

X + l where X = TC ALARM 
BAILOUT +8 

ABORT2 + 1 if via POODOO 
or CSSHOLE 

X +1 where TC ALARM2 


LOCALARM <- LOC 


BANKALRM - 


Save for debugging 


Next Sheet 


NOTE: Symbol " ~ " means "contains" in this flowchart 
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From Preceding Sheet 



Causes T4RUPT Program to transmit 
contents of BIT-positions 11-1 of DSPTAB 
+ 11D to CHAN 10 during next pass through 
T4RUPT. 


According to the entry used. A contains one of the 
following return addresses: 

A = PRIOLARM +7 
A = VARALARM +6 
A = CURTAINS +4 
A = ( * +2) where ^ = TC ALARM 
A = BAILOUT +9 

A = ABORT2 + 2 if via POODOO or CCSHOLE. 
A = (X+2) Where X= TC ALARM2 
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FC -2130 / 


Terminate _ ToX + 2 

Proceed _To X + 3 

Enter-_ To X + 4 

Immediate Return _To ^ + 5 


(cURTAINS+4) 


Return 

\almcadi 


ToX + 1 location of 
CURTAINS calling 
sequence where £ = 
TC CURTAINS 


Location of 
PRIOLARM 
calling 

sequence (Sh. 3 ) 

(only X + 5 is used 
where X = TC BANKCALL 
and X + 1 = CADR 
PRIOLARM 
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/is Is A VE RAG EG 

3it 6 of^v (Servicer) 

sT FLAGW RD7 running ? (Is 

= 1 ? V37FLAG on ? 


i I To get out of interrupt 

Iresumei mode if 111 u 









From Preceding Sheet 



Subroutine 

FC-2070 (Service Routines) 


Permanent State 
vector not updated 
STATEFLG 


Subroutine 

FC-2070 (Service Routines) 


Integration routine 
not to be restarted 
REINTFLG 


Subroutine 

FC-2070 (Service Routines) 


V37 Permitted 
NODOFLAG 


Next Sheet 
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From Preceding Sheet 



Note A: Go to routine GOTOPOOH 
and display flashing verb 
37 unless no major mode 
was active in which case 
control goes to DUMMY JOB 
+2 (see restart. Sheet 23 of 
FC-2020). 
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ALARM AND ABORT 


TABLE OF ALARM CODES 


ALARM 

CODE 

ALARM CONDITION 

SET BY 

ALARM 
ENTRY USED 

00110 

No mark since last mark reject 

SXTMARK 

ALARM 

00112 

Mark not being accepted 

SXTMARK 

ALARM 

00113 

No inbits 

SXTMARK 

ALARM 

00114 

Mark made, but not desired 

SXTMARK 

ALARM 

00115 

Optics torque request with switch not at CMG 

EXT VERB 
OPTICS CDU 

ALARM 

00116 

Optics switch altered before 15 sec zero time 
elapsed 

T4RUPT 

ALARM 

00117 

Optics torque request with optics not available 
(OPTIND = - 0) 

EXT VERB 
OPTICS CDU 

ALARM 

00120 

Optics torque request with optics not zeroed 

T4RUPT 

ALARM 

00121 

CDUS no good at time of mark 

SXTMARK 

ALARM 

00122 

Marking not called for 

SXTMARK 

ALARM 

00124 

TPI search - no safe perictr here 

P17, P77 

ALARM 

00205 

Bad PIPA reading 

SERVICER 

ALARM 

00206 

Zero encode not allowed with coarse align 
+gimbal lock 

IMU MODE 
SWITCH 

IMU-2 

ALARM 

00207 

ISS turn-on request not present for 90 sec 

T4RUPT 

ALARM 

00210 

IMU not operating 

IMU MODE 
SWITCH, 

IMU-2, R02, 
P51 

ALARM 

VARA LA RM 

00211 

Coarse align error - drive >2 degrees 

IMU MODE 
SWITCH 

ALARM 

00212 

PIPA fail but PIPA is not being used 

IMU MODE 

SWITCH, 

T4RUPT 

ALARM 

00213 

IMU not operating with turn-on request 

T4RUPT 

ALARM 

00214 

Program using IMU when turned off 

T4RUPT 

ALARM 

00215 

Preferred orientation selected but not 
specified 

P52, P54 

ALARM 

00217 

Bad return from stall routines 

CURTAINS 

ALARM2 

00220 

IMU not aligned - no REFSMMAT 

R02, P51 

VARALARM 

00401 

Desired gimbal angles yield gimbal lock 

INF ALIGN, 
IMU-2 

ALARM 


MIT INSTRUMENTATION LAB 
CAMBRIDGE. MASS. 

APOLLO GUIDANCE AND NAVIGATION 

Alarm and Abort 

DRAWN /'jf/jSJ’/siUsrdi 

PRGMR /, 

t/ua. 

COLOSSUS II-D 

DOCUMENT NO. 

FC-2140 



APPR'D^A^Yn SAi 

M4& 

REV 2 Isw*' 14 w 161 





ALARM 

CODE 

ALARM CONDITION 

SET BY 

ALARM 
ENTRY USED 

00404 

Target out of view - trunnion angle > 90 deg 

R52 

PRIOLA RM 

00405 

Two stars not available 

P52, P54 

ALARM 

00406 

Rend navigation not operating 

R21, R23 

ALARM 

00407 

Auto optics request trunnion angle i 50 deg 
(target out of view) 

R52 

ALARM 

00421 

W-matrix overflow 

INTEGRV 

ALARM 

00600 

Imaginary roots on first iteration 

P32, P72 

VARALARM 

00601 

Perigee altitude LT PMIN1 

P32, P72 

VARALARM 

00602 

Perigee altitude LT PMIN2 

P32, P72 

VARALARM 

00603 

CSI to CDH time LT PMIN22 

P32, P33, 
P72, P73 

VARALARM 

00604 

CDH to TPI time LT PMIN23 

P32, P72 

VARALARM 

00605 

Number of iterations exceeds loop maximum 

P32, P37, 
P72 

VARALARM 

00606 

DV exceeds maximum 

P32, P72 

VARALARM 

00611 

No TIG for given elev angle 

P34, P74 

ALARM 

00612 

State vector in wrong sphere of influence 

P37 

VARALARM 

00613 

Reentry angle out of limits 

P37 

VARALARM 

00777 

PIPA fail caused the ISS warning 

T4RUPT 

VARALARM 

01102 

CMC self test error 

SELF 

CHECK 

ALARM2 

01105 

Downlink too fast 

T4RUPT 

ALARM 

01106 

Uplink too fast 

T4RUPT 

ALARM 

01107 

Phase table failure. Assume erasable 
memory is destroyed 

RESTART 

ALARM 

01301 

ARCSIN-ARCCOS input angle too large 

INTER¬ 

PRETER 

ALARM 

01407 

VG increasing 

S40.8 

ALARM 

01426 

IMU unsatisfactory 

P61, P62 

ALARM 

0142 7 

IMU reversed 

P61, P62 

ALARM 

01520 

V37 request not permitted at this time 

V37 

ALARM 

01600 

Overflow in drift test 

OPT PRE 

ALIGN 

CALIB 

ALARM 

01601 

Bad IMU torque 

OPT PRE 

ALIGN 

CALIB 

ALARM 

01602 

Bad optics during verification 

OPTALGN 

CALIB 

(CSM) 

ALARM 

01703 

Insuf. time for integ. , TIG has slipped 

R41 

ALARM 

03777 

ICDU fail caused the ISS warning 

T4RUPT 

VARALARM 

04777 

ICDU, PIPA fails caused the ISS warning 

T4RUPT 

VARALARM 
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ALARM 

CODE 

ALARM CONDITION 

SET BY 

ALARM 
ENTRY USED 

07777 

IMU fail caused the ISS warning 

T4RUPT 

VARALARM 

10777 

IMU, PIPA fails caused the ISS warning 

T4RUPT 

VARALARM 

13777 

IMU, ICDU fails caused the ISS warning 

T4RUPT 

VARALARM 

14777 

IMU, ICDU, PIPA fails caused the ISS warning 

T4RUPT 

VARALARM 

20430* 

Integ. abort due to subsurface s. v. 

ALL CALLS 
TO INTE¬ 
GRATION 

POODOO 

20607* 

No solution from time theta or time radius 
routine 

TIMETIiET, 
TIME RAD 

POODOO 

20610* 

Lamda less than unity 

P37 

POODOO 

21103* 

Unused CCS branch executed 

CCSHOLE 

ABORT2 

21204* 

Negative or zero delta time - waitlist call 

WAITLIST 

POODOO 

21206* 

Second job attempts to go to sleep via 
keyboard and display program 

PINBALL 

POODOO 

21210 * 

Two programs using device at same time 

IMU MODE 
SWITCH 

POODOO 

21302* 

SQRT called with negative argument. Abort 

INTER¬ 

PRETER 

POODOO 

21501* 

Keyboard and display alarm during internal 
use (NVSUB). Abort 

PINBALL 

POODOO 

21502* 

Illegal flashing display 

GOPLAY 

POODOO 

21521* 

P01 or P07 illegally selected 

P01, P07 

POODOO 

31104* 

Delay routine busy 

SERVICE 

ROUTINES 

BAILOUT 

31201* 

Executive overflow - no vac areas 

EXEC 

BAILOUT 

31202* 

Executive overflow - no core sets 

EXEC 

BAILOUT 

31203* 

Waitlist overflow - too many tasks 

WAITLIST 

BAILOUT 

31207* 

No vac area for marks 

SXTMARK 

BAILOUT 

31211* 

Illegal interrupt of extended verb 

SXTMARK 

BAILOUT 


Indicates abort type. All others are non-abortive. 
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KEYRUPT AND UPRUPT 


When the operator or the ground communicates with the computer, the infor¬ 
mation being transmitted is first received-by this program KEYRUPT and UPRUPT. 

Several ways are available to communicate with the computer. A command 
may be keyed in (Verb-Noun combination) by depressing keys VERB, VI, V2, 

NOUN, Nl, N2, and ENTER, where VI, V2, Nl, and N2 represent numerical keys 
(0, 1, 2, . . ., 8 or 9). Data may be entered on request from the computer by de¬ 
pressing several numerical keys (and a sign key) and key ENTER. Keys CLEAR, 
ERROR RESET, KEY RLSE may also be depressed. Each time a key is depressed, 
routine KEYRUPT which requests the execution of job CHARIN (in Pinball program, 
FC-2180), is executed. Each time job CHARIN is executed, it performs an operation 
determined by the key that was depressed. When key ENTER is depressed, the com¬ 
mand (which has been keyed in as a Verb-Noun combination) is executed or the data 
(which has been keyed in) is accepted. Routine UPRUPT is executed each time an 
uplink word has been received from the ground; it also requests the execution of 
job CHARIN. Each uplink word contains information similar to that generated by 
depressing a key on a Dsky. 

Routine KEYRUPT processes the key code of each character transmitted 
from the keyboard of the Dsky via Channel 15 (Bit positions 5-1). Routine UPRUPT 
processes the key code of each character transmitted from the ground via uplink 
counter INLINK. 

When a key on the keyboard is depressed, the routine being executed is inter¬ 
rupted by interrupt program No. 5. A key code (5-bit configuration) representing 
the character selected will be placed into bit positons 5-1 of channel 15 by hardware 
action. Control will arrive at routine KEYRUPT via its lead-in interrupt routine. 

When uplink counter INLINK overflows, the routine being executed ia inter¬ 
rupted by interrupt program No. 7. A key code word (uplink word) representing 
the character transmitted from the ground is serially loaded from the uplink receiver 
into INLINK. The key code word ia a 16-bit word consisting of a one in bit-position 
16 and the key code (5-bit configuration) is in bit position 15-11 and 5-1 and its 
complement in 10-6. When the one in bit-position 16 of the 16-bit word reaches 
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bit-position 16 of INLINK during the serial loading (shifting left in INLINK one bit- 
position at a time), overflow occurs causing interrupt No. 7. Control will arrive 
at routine UPRUPT via its lead-in interrupt routine. 


The characters are represented by the following key codes: 


Character 
(or action) 


Key Code 
(binary) 


Character 
(or action) 


Key Code 
(binary) 


0 10 000 

1 00 001 

2 00 010 

3 00 011 

4 00 100 

5 00 101 

6 oo no 

7 00 111 

8 01 000 

9 01 001 


VERB 10 001 

ERROR RESET 10 010 

KEY RELEASE 11 001 

+ 11 010 

11 011 

ENTER 11 100 

CLEAR 11 110 

NOUN 11 111 


Both routines preserve the banks, Q register and the current time (double 
precision) and make the key code available for routine CHARIN of program Pinball. 

KEYRUPT also sets DSKYFLAG (indicates that displays are to be sent to the 
Dsky) and schedules routine CHARIN of program Pinball as a job at priority 30. 

UPRUPT also clears INLINK for the next key code, turns on uplink activity 
light and tests the key code for triple character redundancy. The key code is satis¬ 
factory if the original contents of bit-positions 15-11 of INLINK are the same as the 
original contents of bit-positions 5-1 and the complement of the original contents of 
bit-positions 10-6. If the key code is not satisfactory, UPLOCKFL flag is set and 
the interrupted routine is resumed. If the key code is satisfactory, and it is the error 
reset code, then the UPLOCKFL flag is cleared and routine CHARIN of program 
Pinball is scheduled as a job at priority 30 and the interrupted routine is resumed. 

If the key code is not the error reset code and the UPLOCKFL flag is cleared, then 
routine CHARIN is scheduled as a job. If the UPLOCKFL flag was not cleared, 
CHARIN will not be scheduled and the interrupted routine will be resumed because 
an error reset code must be sent since the last unsatisfactory key code before 
subsequent key codes can be accepted. 


MIT INSTRUMENTATION LAB 
CAMBRIDGE. MASS. 

APOLLO GUIDANCE AN0 NAVIGATION 

DRAWN -- 

UaM- 

KEYRUPT AND UPRUPT 



COLOSSUS 

H-C 

DOCUMENT NO. 

FC-2150 

ANALs/ 


ncrutf 1 Hii. 


APPR-pW^fo. 


REV ISHEET2 Of « | 



Control arrives here from the interrupted routine 
when a key on the keyboard of the DSKY is depressed 
to transmit a character. 


( 4024 


As control arrives, the 5-bit key 
code of the character is in bit- 
positions 5-1 of channel 15 


[ARUPT, LRUPT] *-[A, L| 

A -—BBANK 

BBANK — BBCON of KEYRUPT1 


Interrupt lead-in 
routine (not a part 
of KEYRUPT 1) 


Between interrupted routine and lead-in routine, hard¬ 
ware action causes BRUPT - B and ZRUPT - Z so 
that BRUPT contains instruction 0 and ZRUPT contains 
address d. + 2 of interrupted routine sequence as 
follows: 

d + 0 a (a is instruction being executed when 
interrupt began) 

e£ + 1 (3 (3 is instruction to be executed first 
upon resuming interrupted routine) 



The current time is saved in double precis 
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KEYCOM 


^3 


EUPTREG4 


Key Code (0-0-K) 


Set DSKYFLAG 
Indicates that displays were 


the DSKY. 
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Control arrives here from the interrupted routine 
each time a character is transmitted from the 
ground. 


As control arrives the 5-bit 
key code of the character 
is in bit-positions 15-11 
(true form), 10-6 (com¬ 
plement form) and 5-1 
(true form) of the coun¬ 
ter INLINK. 


[ARUPT, LRUPT] — fA, L] 
A-—BBANK 

BBANK -— BBCON of UPRUPT 


Interrupt lead-in 
routine (not part of 
UPRUPT) 


Between interrupted routine and lead-in routine, hardware 
action causes BRUPT ■*- B and ZRUPT ■*- Z so that BRUPT 
contains instruction (3 and ZRUPT contains address 
£+ 2 oi interrupted routine sequence as follows: 

.JL+ 0 a (a is instruction being executed when 
interrupt began) 

a£+ 1 ^ ((3 is instruction to be executed first 

upon resuming interrupted routine) 


(uprupt) 


I 


/ LOP SAM PT \ The current time is saved in double precision 
[SAMPTIME +0, +1]' 

-- [TIME2, TIME1] 


FC-2180 

m 


INLINK, 



complement form 
true form 


= Key code 
INLINK 1q _ 6 = Key code 
INLINK 15 _ n = Key code 
INLINK is cleared to allow the next key code 
word to be processed 


Turn on UPLINK activity light 
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From Preceding Sheet 


A = -0 



is the key code in INLINK equal to the key 

^code in IiIlINK*^? 


•*-- n Set UPLOCKFL 

et bit 4 of fi a „ 

LAGWRD7 I indicates K- 

T"- 1 K-K test 

failed 


KEYRUPT AND UPRUPT 


COLOSSUS 




From 


: ding 


Clear UPLOCKFL 
flag to allow 
subsequent 


If the transmission of a 
key code was not satis¬ 
factory (K-K-K failure) 
the UPLOCKFL flag wi 
be set to prevent furthe 
transmission of a key u 
it is preceded by the tr 
mission of an error re: 
code which will result i 
clearing the UPLOCKF 
flag to allow subsequen 
transmissions of key c< 
from the ground. 


Is X. Has the ground transmit 
bit 4 of v. reset code since the 1 
\FLAGWRD7 > factory key code?—A 
X. = O’ /X now permitted from t) 
X. (Is UPLOCKFL flag c 
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From Sheets 4 and 8 


Location CHARIN is the beginning of program 
PINBALL (its entry point) 

Program PINBALL executes the requests for 
displays from the operator (key board) and 
the ground 


(MPAC t LOCCTR)— RUPTREG4 


RUPTREG4 = KEYTEMP1 and contains the key code 
in the 0-0-K arrangement 


\RESUME f Resume 


the interrupted routine 
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MAJOR SUBROUTIN 


EXTERNA I 


T4RUPT 

CDRVE 

OPTTEST 

OPTMON 

IMUMON 


ITURNON 

SETISSW 

IMUOP 
TNONTEST 


SERVICE ROUTINE WHICH PROCESSES DISPLAY REQUESTS 
AND MONITORS VARIOUS HARDWARE SYSTEMS 

BRANCH OF T4RUPT ENTERED EVERY 120 MS; EXECUTES 
CYCLICALLY FUNCTIONS LISTED ABOVE FOR T4RUPT 

BRANCH OF CDRVE ENTERED EVERY 480 MS; DOES COARSE 
ALIGNMENT OF OPTICS SHAFT AND TRUNNION 

BRANCH OF CDRVE ENTERED EVERY 480 MS. MONITORS CHANGES 
IN OPTICS CDU FAILURE STATUS. OPTICS SWITCH POSITION 

BRANCH OF CDRVE ENTERED EVERY 480 MS; MONITOR IMU 
STATUS CHANGES 

MONITORS CHANGE IN IMU TEMPERATURE STATUS 
MONITORS CHANGE IN ISS TURN-ON REQUEST STATUS 
SETS ISS WARNING LAMP AS APPROPRIATE 
MONITORS CHANGE IN IMU CAGE SWITCH STATUS 
MONITORS CHANGE IN IMU OPERATE STATUS 

ENTERED FROM IMUMON EVERY 480 MS; DOES ISS INITIALIZATION 


ENDTNON 

C33TEST 


ENDS ISS TURN-ON SEQUENCE 

ENTERED^FROM TNONTEST EVERY 480 MS; MONITORS CHANNEL 33 


PIPFAIL 

DNTMFAST 

UPTMFAST 

GLOCKMON 

QUIKDSP 
DS POUTS B 


MONITORS CHANGE IN PIPA FAILURE STATUS 
MONITORS CHANGE IN DOWN TELEMETRY SPEED STATUS 
MONITORS CHANGE IN UP TELEMETRY SPEED STATUS 

ENTERED FROM C33TEST EVERY 480 MS; MONITORS MIDDLE IMU 
GIMBAL ANGLE FOR POSSIBLE GIMBAL LOCK 

BRANCH OF T4RUPT ENTERED BETWEEN 120 MS PASSES; EXECUTES 
DISPLAY FUNCTIONS ONLY 

FINDS AND PROCESSES ONE DISPLAY REQUEST 


SPECIAL CONVENTIONS: 

■©■ MODULAR SUBTRACTION 

•V LOGICAL "EXCLUSIVE OR" 

• a LOGICAL COMPLEMENT OF a 
































































































PRESENT SWITCH POSI 






















































^ENDTNON 


IITIATED (SO SECONDS AGO) 














































































FLAGS (CONTINUED) 


NAME 

MEANING WHEN SET 

MEANING WHEN CLEAR 

WHERE 

WHERE 

CLEARED 

WHERE 

TESTED 

IMODES30 

ISS NOT OPERATING 

ISS OPERATING 

SH.2 5 

SH.25 

s “- > 3 4 *’ 

IMODES30 

BIT 10 

NO PIPA FAILURE 

PIPA FAILURE 

SH.41 

SH.41 

SH. 30, 41 

IMODES30 

REQUESTED 

IMU CAGE REQUESTED 

SH.25 

SH.25 

SH.31 

IMODES3Q 

NO ICDU FAILURE 

ICDU FAILURE 

SH.25 

SH.25 

SH.30 

IMODES30 

NO IMU FAILURE 

IMU FAILURE 

SH.25 

SH.25 

SH.30 

IMODES30 

REQUESTED 

ISS TURN-ON REQUESTED 

SH.25 

SH.25 

SH.29.33 

IMODES30 

IMODES33 

ISS TEMPERATURE 

NOT WITHIN LIMITS 

progress T IN 

ISS TEMPERATURE 

WITHIN LIMITS 

LAMP TEST NOT IN 
PROGRESS 



S„„ 

IMODES33 

BIT 6 

AUTOPILOT DISABLED 

AUTOPILOT ENABLED 

SH.32. 

SH.36 


IMODES33 

UPLINK NOT TOO FAST 

UPLINK TOO FAST 

SH.38 

SH.38 


IMODES33 

DOWNLINK NOT TOO 

DOWNLINK TOO FAST 

SH.38 

SH.38 

SH.42 

IMODES33 

NO PIPA FAILURE 

PIPA FAILURE 

SH.38 

SH.38 

SH.41 

IMODES33 
BIT 14 

PROCEED KEY NOT 
DEPRESSED 

PROCEED KEY 

DEPRESSED 

SH.5 

SH.5 

SH.5 

IMUSE 

FLAGWRDO 

IMU IN USE 

IMU NOT IN USE 


SH.32 

SH. 34,35 

OPTMODES 

ENDZOPT SCHEDULED 

ENDZOPT NOT SCHEDULED 

SH.13 

SH..4 

SH.17 

OPTMODES 

OPTICS CDU FAILURE 
SIGNAL INHIBITED 

OPTICS CDU FAILURE 
SIGNAL ALLOWED 

SH.22 

SH.H, 

SH.84 

OPTMODES 
BIT 3 

OPTICS ZEROING IN 
PROGRESS 

OPTICS ZEROING NOT 

IN PROGRESS 

SH.22 

SH.H, 

SH.17 

OPTMODES 

OPTICS SWITCH NOT 

IN "CMC" POSITION 

OPTICS SWITCH IN "CMC" 
POSITION 

SH.ll 

SH.ll 

SH.ll 

OPTMODES 

OPTICS SWITCH NOT 

IN "ZERO" POSITION 

OPTICS SWITCH IN 
"ZERO" POSITION 

SH.ll 

SH.ll 

SH.ll 

OPTMODES 

NO OPTICS CDU 
FAILURE 

OPTICS CDU FAILURE 

SH.ll 

SH.ll 


OPTMODES 
BIT 9 

OPTMODES 

OPTICS HAVE BEEN 
COARSE ALIGNED 

SINCE LAST FRESH 

OPTICS HAVE BEEN 
ZEROED SINCE LAST 
FRESH START 

OPTICS HAVE NOT BEEN 
COARSE ALIGNED SINCE 
LAST FRESH START 

OPTICS HAVE NOT BEEN 
ZEROED SINCE LAST 

FRESH START 

SH.14 
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MEANING 


SCALING 


Q 

- y.l 

CENTRAL PROCESSOR REGISTER 
USED FOR RETURNS FROM 
SUBROUTINES 




QRUPT 


TEMPORARY STORAGE FOR Q 
(ABOVE) DURING INTERRUPT 




SWSAMPLE 


INDICATES WHETHER OPTICS 
SWITCH IS IN CMC, MANUAL, OR 
ZERO POSITION (BY POSITIVE, 

+0, OR NEGATIVE VALUE, 
RESPECTIVELY) AT PRESENT 

PASS THROUGH OPTMON 




TIME2 q 
_ /TIME2\ 

‘ \TIME1/ 


PRESENT TIME FROM LIFTOFF 

SECS 

CSECS 


TIME4 


COUNTER WHICH CONTROLS 
TIMING OF T4RUPT 




WTOPTION 


NUMBER OF 480 MS CYCLES 

WITH OPTICS IN MANUAL MODE 
BEFORE A CHANGE TO ZERO 

MODE WOULD REQUIRE THE 

FULL INITIALIZATION DELAY 



2 14 



INDICATES WHETHER MAGNITUDE 
OF OPTICS SHAFT ANGLE IS 
< 45° (IF SO, ZONE = 0) AND IF 

NOT, IN WHICH DIRECTION 

SHAFT ANGLE LEFT THAT 

REGION (BY POSITIVE OR 
NEGATIVE VALUE). 




ZOPTCNT 


NUMBER OF 480 MS CYCLES 

WITH OPTICS IN ZERO MODE 
BEFORE TIME TO FINISH 

OPTICS ZEROING PROCESS 



2 14 


I-'* 


COLOSSUS IT-A PQ * 2 200 
















P06 GNCS POWER DOWN 

SCALPREP Sh. 7 

POSTAND Sh. 4 




MIT INSTRUMENTATION IA» 
CAMBRIDGE, MASS. 

APOLLO GUIDANCE ANO NAVIGATION 



■ P06 GNCS Power Down 

Z--3-G 

COLOSSUS 2D 

DOCUMENT NO. 

FC-2220 


mm 

1 

wm, 





The function of the P06 routine is to set up and execute 
(via GOPERF1) a CMC STANDBY. P06 also gives a 
time counter update after the STANDBY execution. 
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P06 GNCS Power Down 

DRAWN 

1iqfac&fl 

Docil 


COLOSSUS 2D FC^So" - 

y , . ... 

APPR'O-I 

IS 

fcv |SHEET 2 Of 8 









Next Sheet 


Bit 6, FLAGWRD1 Inhibit tracking. 

Bit 13, FLAGWRD3 REFSMMAT is no good. 

Bit 15, FLAGWRD2 Inhibit gyro compensation. 

Accomplished via 
BANKCALL to RNDREFDR 


Bit 8, FLAGWRDO IMU not in use. 

Bit 7, FLAGWRDO P20 not running. 

Accomplished via subroutin' 
DOWNFLAG. 


STANDBY ENABLE DISCRETE 


Request performance of CMC Standby 
(Verbs 32, 33, 34 not relevant) 




From Preceding Sheet 



into standby (exit P06) 


POSTAND recovers the time after STANDBY and 
snapshots the scaler while setting TIME1, TIME2; 
insures compatability between the scaler reading and 
the clearing of the time counter. POSTAND then 
computes the d. p. difference in scaler values and 
increments the previously snapshotted values TIME1, 
TIME2 by the difference. The updated result is then 
placed into the time counters. 


Clear STANDBY ENABLE bit 
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P06 GNCS Power Down 

PRGMR iVgyflS VOCfULs 

ANALST 



DOCUMENT NO. 

DOCMR OAhr-nffi 





illklil 

REV 

ISHEET4 Of B 









Inputs: See Sh. 


Outputs: See Sh. 1 


Form d. p. difference of post-STANDBY 
scaler. 


Align bits with TIME1, TIME2 


Inputs: A triple precision number in MPAC, 
in A, a single precision number 


Output: The triple precision quotient in MPAC 


Force a sign agreement among the triple pre 
cision contents of MPAC, returning with the 
signum of the input in A. 






From Prec« 


;ding Sheet 



MIT INSTRUMENTATION LAI 
CAMIRIDGE, MASS. 

APOLLO GUIDANCE ANO NAVIGATION 

orawn 


P06 GNCS Po 

.or Down 

ANAIST 


COLOSSUS 2D 

DOCUMENT NO. 

FC-2220 

DOCMR Qrt 



Am i 

REV ISHEET6 0E8 | 







APOUiO GUIDANCE AND NAVIGATION 


P06 GNCS Power Down 
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FLAGS 


Name 

Meaning When 
Set 

Meaning When 
Clear 

Where 

Set 

Where 

Cleared 

Where 

Tested 

NODOFLAG 

V37 not permitted 

V37 permitted 

Sh. 2 

Sh. 6 


TRACKFLG 

Tracking allowed 

Tracking not Allowed 


Sh. 3 


REFSMFLG 

REFSMMAT good 

REFSMMAT no good 


Sh. 3 


DRIFTFLG 

IRRUPT calls 
gyro 

compensation 

T3RUPT does no 
good 


Sh. 3 


IMUSE 

IMU in use 

IMU not in use 


Sh. 3 


RNDVZFLG 

P20 running 

P20 not running 


Sh. 3 



SUBROUTINES CALLED WHICH ARE 
FLOWED ON OTHER FLOWCHARTS 


Subroutine 

Where 

Flowed 

Description 

Where 

Called 

GOPERF1 

FC -2130 

Perform CMC Standby 

Sh. 3 

SHORTMP 

FC-2090 

Multiplies a triple precision number by a 
single precision number with a t. p. result. 

Sh. 5 

TPAGREE 

FC-2090 

Makes sign difference of two numbers 
agree. 

Sh. 5, 6 

FINETIME 
+ 1 

FC-2210 

Read computer clock time pulses 

Sh. 7 
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IMU EXTENDED VERBS 


VBZERO Sh. 2 

VBCOARK Sh. 4 

IMUFINEK Sh. 8 
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IMU Extended Verbs 


COLOSSUS 2D 


DOCUMENT N( 
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COLOSSUS2D 
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IMU Extended Verbs 
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DOCUMENT NO. 
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From Preceding Sheet 


_GQXDSPF-X THETAD: 

\ CDTJ degrees 

Display Flashing I xxx. xx degrees 


'ERMEXTV / (=ENDEXT) 
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OPTCOARKJ 


v y 
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IMU Extended Verbs 


DOCUMENT NO. 

(COLOSSUS 2D | FC-2235 

TsitET 6 Of 



From Preceding Sheet 


jvia BANKCAL 

nnvnQPT? \ 




« V IMU Extended Verbs 

I DOCUMENT NC 

COLOSSUS 2D FC-2235 







Next Sheet 




From Preceding Sheet 






SUBROUTINES CALLED WHICH ARE 
FLOWED ON OTHER FLOWCHARTS 


Subroutine 

Name 

Where 

Flowed 

Description 

Where 

Called 

ALARM 

FC-2140 

Light program alarm light 

6, 7 

ALM/END 

FC-2190 

Turn on operator error light and 
return via PINBRNCH (FC-2130) 

2, 3, 4, 

6, 8 

FALTON 

FC-2180 

Turn on operator error light 

6 

IMUCOARS 

FC-2210 

IMU coarse align mode switch 

5 

IMUFINE 

FC-2210 

IMU fine align mode switch 

9 

IMUPULSE 

FC-2210 

Torque IRIG's 

9 

IMUSTALL 

FC-2210 

Delays further execution of the calling routine 
until its selected I/O function is complete 

3, 5, 9 

IMUZERO 

FC-2210 

Zero IMU CDU angles 

3 

TESTXACT 

FC-2190 

Test extended verb display system 

4, 6, 8 
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i ROUTINE IB EXECUTLO BY HJTCRNM. 
TIWEB TO RELEWE THE MA.RK SYSTEM 
ME IT AV^U-AvOl-E TO OTHER INTER 
1YSTEM ROUTINES. IT AJ.BO CUEA.RB 
COMKE OPTICB FUAJ2, BIT, AJHD DIC¬ 
E'S THE OPTICB ERROR COUNTER. 


3 


1ST WORD OF VAC AREhC\ SET TO . 
VAC ADDRESS TO SIGNIFY 
ACVAIL ABILITY 
CLEAR MARKSTAT 


A.R COARSE OPTIC'S FLAG, BIT 


El OPTIC'S ERROR COUNTER 


1“ "SXTI 


5XTMARK 

COLOSSUS “ora* 1 



























R57: OPTICS CALIBRATION ROUTINE 


R57 Sh. 2 

MARKDISP Sh. 4 
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WmMm ran 

U A-U 

R57: Optics Calibration 
_Routine 

miM 


ten 
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Routine 
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t rom .Preceding Sheet 



Display V59: 
"Please perform 
optics calibration 


Blank DSKY > 
registers Rl, 
R2, R3 / 



~ R57: Optics Calibration 

f _ Routine _ 

^ I DOCUMENT MO. 

- COLOSSUS IIC FC-2242 



(MARKDISPj Marking Display job 

V -1- ' -set up by MARKCONT 

| (FC-2240) 



R2: xx. xxx deg 
(optics trunnion 
angle: 

MRKBUF1 +5) 

R 3: blank 


(MRKBUF1 +5) - 19. 77° Store correc 









Subroutines Called which are on Other Flow Charts 


Subroutine 

BAILOUT 

BLANKET 

ENDMARK 


Flow Chart 
FC-2140 

FC-2130 

FC-2130 


Description 

Light PROG ALARM light; 
set alarm code; cause 
software restart. 

Blank Rl, R2, and/or R3 

Terminate marking display 
interface 


Where CaUed 
Sh. 2 

Sh. 3,4 
Sh. 5 


Displays 


Verb-Noun 


Type of Display Description of Registers Where Called 


V59 


V06N87 


Flashing 


Flashing 


Please perform optics Sh. 3 

calibration mark. Rl, 

R2, R3 blank. 

Rl: blank Sh. 4 

R2: xx. xxx deg 

(optics trunnion 
angle MRKBUF1 +5) 

R3: blank 
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R57: Optics Calibration 

Routine 
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Flag 


Extended verb 
system in use 
for marking 


Extended verb 
system not in 
use for marking 


EXTVBACT 
bit 3 


V59FLAG 
/FLAGWRD5\ 
l bit 12 ) 


Extended verb 
system in use 
for extended 


Calibrating for 
P23 


Extended verb 
system not in 
use for extended 


Normal marking Sh. 3 
for P23 


Sh. 5 


Where 

Tested 

Sh. 2 


Erasable Locations Used : 


AGC Tag 
MRKBUF1 +5 


AGC 

Scale 

Factor 


Trunnion bias angle 
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R57: Optics Calibration 
Routine 

ANAIST 

f 


DOCUMENT NO. 

FC-2242 

docmr 


COLOSSUS IIC 

APPR'P't^fiMtr.tfJ 


REV 1 ISHEET 7 Of 7 1 



LATITUDE LONGITUDE SUBROUTINES 


LAT-LONG Sh. 2 
LALOTORV Sh. 7 
GETERAD Sh. 9 
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<^44 

Latitude Longit 

ide Subroutines 


IX1LJ& 

COLOSSUS 2D 

FC-2280 

APPR'D-f?,Ji.^>'yyi .CUbu 

jyxliL 
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(LAT-LON0) 


Vector to latitude, longitude, 
altitude subroutine 



Next Sheet 
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ANALST /).°M 
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Preceding Sheet 


Convert vector in reference 
coord, system to vector in 
planetary coord, system 
Output: MPACy = Tp vector 
in m <@ 2 +2 5 7 for earth 


,-*-n. Input: 

/ \ LUNAFLAG: 

/SETGAMMA \ clear for earth 

Set earth \ S et for moon 
. or moon / 
x / Output: 

\ ShTlO T GAMRP containing . 

-1- B2/A2 (earth V )(®2 +J 

! or 1B1 (=U moon»@2 +1 


COSTH_f— 2 • GAMRP V (ALPHA V-! 


jLatitude Longitude Subrc 


-yd. L „, 


COLOSSUS 2D 


DOCUMENT NO. 







From Preceding Sheet 


Compute 
in' 1 (LAT) 


| LAT4 THETAp | Sft ^ 


COSTH D <--ALPHA V D 
SINTH_«-ALPHA V +2 


cos (LONG) @2 +i (=u 0 ) 
sin(LONG) @2 +1 (=u 1 ) 


Compute 
tan -1 (LONG) 
\ Sh. 5 


LONG-*—THETA d 
ALT„<—ALPHAM - ERADM 


Longitude in revs @2 
-1/2 < 6 4 1/2 


INCORPEX contains QPRET 
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ARCTAN 
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> 4 / 7 /^ 

Latitude Longitude Subroutine 

PRGMR a 


I DOCUMENT NO. 

ANALSTy. ft?. Tfrleu - 

MILA. 

COLOSSUS 2D FC-2280 







Latitude, longitude, 
altitude to vector 
subroutine 


^ALOTOR^ 

^ --i 


INCORPEX 

QPRET 


Save return address 


PUSHLOCf— 0 Initialize Push-down pointer 



Next Sheet 
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From Preceding Sheet 


PL0,,<—Unit(MPAC n , PL2 PLO n ) 


cos(LONG)cosC 

sin(LONG)cos(I 

>sin(LAT) 


Output: 

ERADM— = earth oi 
radius i 



Input: 

MPAC = 0 for earth 

= 1 for moon +2 

PL0 V = unit r p vector @2 
PL6g = time* csec@2 +28 
OUTPUT: 

MPACy = unit r vector 

®2 +29 for earth 
@ 2+ 27 for moon 


APOLLO GUIDANCE AND NAVIGATION 


J Latitude Longitude Subrouti 







From Preceding Sheet 


ALPHA V y <—MPACy Unit r vector @2 
MPAC_<—ERADM-. Earth or moon „ g 

D_ radius in m@2 +29 


__Shift Jeft (multiply 

I ALPHAV <— 2 1 (ERADM + ALT)(ALPHAV v ) I by 2+ ^ for SCaling ; 2 g 


INCORPEX contains QPRET 



)/l - (1 - ■SgMl - SINL‘) 


- EE (1/2 - 2* (ALPHA V +4)“) 


£ Latitude Longitude Subroutines 




SETGAMMi 


Determii 
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Latitude Longitude Subroutines 
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DOCUMENT NO. 
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SUBROUTINES CALLED WHICH ARE FLOWED ON OTHER FLOWCHARTS 


Subroutine 

Where 

Flowed 

Description 

Where 

Called 

R-TO-RP 

FC-2283 

Converts r vector to Tp vector 

Sh. 3 

RP-TO-R 

FC-2283 

Converts r vector to r vector 

Sh. 8 






FLAGS 


Name 

Meaning 

When Set 

Meaning 

When Clear 

Where 

Set 

Where 

Cleared 

Where 

Tested 

ERADFLAG 
flag 1 
bit 13 

Earth: compute 
Fischer ellipsoid 
radius 

Moon: use fixed 
radius 

Earth: use fixed 
radius 

Moon: use r- g for 
lunar radius^ 0 



Sh. 11, 
12 

LUNAFLAG 
flag 3 
bit 12 

Lunar LAT-LONG 

Earth LAT-LONG 



Sh. 2, 
8,10,11 
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PRELIMINARY 


I IT INSTRUMENTATION LAI 


APOUO GUIDANCE AN 









INVERTS 


THE BASIC REFERENCE COORDINATE ! 
r- THE SAME VECTOR EXPRESSED IN 

PLANETARY (earth fixed or moon t 
COORDINATE SYSTEM. 



2. PLO v - r @ 

3. PL6p = t, TI ME OFF, IN CSEC , AT 2 1 




□ m 


RPREXIT CONTAINS QPRET 

PRELIMINARY 


APOLLO GUIDANCE AND NAV 

PLANETARY INER 1 
ORIEN^g^N SUBRC 









COLOSSUS 

























PRELIMINARY 



































































































































































































ACCEUERKTIC 























FROM PRECEDING, «bHEET 













































■ ORBITAL ' 

^ ^/zZZZ-X7^« INTEGRATION 
U» colossus FC~?300 
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ERASABLE LOCATIONS 
















PROGRAM CONSTANTS (CONTINUED) 


DELRSPL-AUGEKUGL CONSTANTS, CONTINUE! 






(RENDEZVOUS PARAMET E 
~,£ DISPLAY 






















































BASETHV v v r VELOCITY VECTOR OF CSM 

AT BASETIME 

BASETIME n REFERENCE TIME FOR 

ORIGINAL PRECISION STATE 
VECTORS 

CDUS SHAFT ANGLE 

CDUT TRUNNION ANGLE 

FEET/SEC 

MIN/SEC 

DEGREES 

DEGREES 

M/CSEC 

272' 

COSCDUX 1 

COSCDUY > OUTPUT OF CDUT RIG ROUTINE 

COSCDUZ J 

FIXLOC ADDRESS OF VAC AREA 

PIPTIME n TIME CORRESPONDING TO 

U CURRENT STATE VECTOR (WHEN 

AVERAGEG IS RUNNING) 

RANGE _ RANGE DISTANCE BETWEEN THE TWO 

u VEHICLES 

SECONDS 

METERS 

2 2S 

RATT„ RADIUS VECTOR OUTPUT OF 

v INTEGRATION 

RATT1.. SAME AS RATT, BUT VARIABLE 

V SCALING 

RCV„ POSITION VECTOR FROM WHICH 

v TO START INTEGRATION 

FEET 

METERS 

METERS 

METERS 

2 2 7/2 2 9 

REFSMMAT.. TRANSFORMATION MATRIX FOR 

M REFERENCE TO STABLE 

MEMBER CONVERSION 

R N v r RADIUS VECTOR AS GIVEN BY 


METERS 

2 29 

RONE r RADIUS VECTOR INPUT TO 

v “ INTEGRATION 

rrate d RANGE RANGE RATE 

RTHETA d e THETA 

FEET/SEC 

DEGREES 

METERS 

M/CSEC 

2 29 '2 27 

SINCDUX 'j 

SINCDUY \ OUTPUT OF CDUTRIG 

SINCDUZ J 

TAT TIME OF THE OUTPUT OF 

SECONDS 


| 

^ ORBITAL INTEGRATION 

TDEd TIME TO BE INTEGRATED TO 

TET TIME TO BE INTEGRATED FROM 

SECONDS 

SECONDS 



itfTOWKIWION IU 

[rendezvous parameters 


. 

DISPLAY 

j wy . 

^ouc^susnc FC-2325 































































XX DEG. - ROLL ( OUTER GIMBAL) FINAL DESIRED 


V5ON10 

PERFORM 

R3-C T P H S E I TA -*XI 

<.XX OEG.-PITCH(ihNER GIMBAL) GIMBAL ANGLES 

SH Z 

V06N18 

HON FLASHING 

R2~ CTHETA -XX; 

KX DEG.-ROLL ROUTER GIMBAL) FINAL DESIRED 
X.XX DEG.-PITCHflNNER GIMBAL) GIMBAL ANGLES 
XX DEG.-YAW ( MIDDLE GIMBAL) 

SH3 
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EXTENDED VERB 76 



Preferred Tracking Attitude 


EXTENDED VERB 77 



+X-axis Tracking Attitude 
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Preferred Attitude Flag 
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FLAG 


Name / 

Meaning When 

Set 

Meaning When 
Cleared 

Where 

Set 

Where 

Cleared 

When 

prftrkaIt 

Flag 5 

Bit TO 

Preferred tracking 
attitude 

+X-axis tracking 
attitude 

Sh. 2 

Sh. 2 
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DRAWN Ar 


analST__ 

znzr 

COLOSSUS 2D 1 ^:^3 J 





DAP INTERFACE AND SERVICE ROUTINES 


STABLISH Sh. 2 

GOPIN Sh. 3 

RCSDAPUP Sh. 4 

RCSDAPON Sh. 4 

SATSTKON Sh. 5 

DAPDISP Sh. 6 

V7 9 Sh. 10 

S41. 2 Sh. 13 

540.14 Sh. 17 

540.15 Sh. 17 

ENATMA Sh. 18 

V60 Sh. 18 

V61 Sh. 18 

V62 Sh. 19 

V63 Sh. 19 

NEEDLER Sh. 20 

NEEDLES3 Sh. 21 

STICKCHK Sh. 23 

SETMAXDB Sh. 24 

SETMINDB Sh. 24 

AMBGUPDT Sh. 25 

DPADD Sh. 26 

SMALLMP Sh. 28 
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Extended Verb 46: RCS DAP Turn-on 
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Preceding Sheet 
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REDOSAT 
y Schedule 
V Saturn- / 
/DAP turn- ^ 








Verb 48: Load Autopilot Data 



Turn on operator 
error light and 
then transfer 
control to 
PINBRNCH 
(FC-2130) 
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Wide deadband? 



~Tf<_Set bit 12 

Clear of FLAGWORD 9 

1AXDBFLG accordingly 


/ GOXDSPF \ 

Display Flashing] 
A V06N47 L 


Rl-CSMMASS xxx 
R2-LEMMASS xx> 
R3-Blank 


APOLLO GUIDANCE AND NAVIGATION 








CHlD 


Input: EXTVBAC 



Turn on operator error 
light and then transfer 
control to PINBRNCH 
(FC-2130) 


APOLLO GUIDANCE 

AN 

NAVIGATION 

DAP Interface 
and Service Routines 

COLOSSUS 2D 

DOCUMENT NO. 
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/ GOMARKF \ 

(Display Flashing l Terminate 
\ V06N79 / 

I Proceed 



.1: RATEPTC x.xxxx deg/sec 
Rate Passive Thermal Control 
.2: DBPTC xxx. xxdeg. 

Deadband Passive Thermal Control 
:3: OPTPTC xxxxx. 

X- or Y- axis option 


Zero WBODY's, DELCDU's, and 
(Zero incremental angles, rates, 
biases for roll, pitch, and yaw). 


CDUXDeTHETADX 
CDUYDeTHETADY 
CDUZDeTHETADZ 


Set steering angles 
to the center of DAP 
deadband. 
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From Preceding Sheet 
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S41.2.S40. 


id S40. 15 Decode DAP 


















J/M <-IXX (.662034) 

J/Ml «— IAVG(.662034) 
J/M2 <— IAVG (. 662034) 
KMJ *— .00118/IXX 
KMJ1 . 00118/IAVG 
KMJ 2 <— .00118/IAVG 


S/C inertia to torque 
S/C inertia to torque 
S/C inertia to torque 
S/C torque to inertia 
S/C torque to inertia 
S/C torque to inertia 


•ev/rev @2 +4 xl. 07975 for CSM 


A POLIO GUIDANCE AND NAVIGATION 




Extended V< 




erb 58-Enable Automat 


i enatma) 

a DOWNFLAG 

Reset flag 



that R61 may perform 
automatic tracking maneuvers 
after interrupt by RHC activity 
(STIKFLAG - Flagwrd 1 bit 14) 


UPFLAG 

Flagword 3 


Extended Verbs 60-63 DAP Error Display Configuration 
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FDA I NEEDLE DRIVE ROUTINE 










From Preceding Sheet 







RCS-DAP Subr< 




Decode stick commands 
(A contains contents of channel 31 c 
Pitch) 0 —> No rotation 
Yaw ? 1 * + rotation 

Roll J 2 ~- rotation 
3 ->( No rotation) 


Idrawn $lL 
PRGMR 


>/$//; 
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Matrix Update Subroutine 



Sin (CDUZ) 0 

0 Cos (CDUZ) Cos (CDUX-7.25) Sin (CDUX-7.25) 
0-Cos (CDUZ) Sin (CDUX-7. 25) Cos (CDUX-7.25) 


1 Sin TJ 0 

0 Cos Cos <p Sin 
0 Cosljj Sin {) Cos <£), 
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MYSUBS Arithmetic Subroutines 






The real value of the angle stored in KMPAC lies always 
between *360°. The storage capacity of KMPAC, however, 
is between *180°. If positive overflow,, the real valug lies 
between +180°and+360°, white the stored value is 180 smaller. 
However, by subtracting 180 (POSMAX + 1) from this stored 
value, it becomes equivalent to the real valgie (as 0-36O°=e). 
This derived value lies between 0°and -180 , and hence is 
storable. A similar logic applies to negative overflow. In 
the case where both KMPAC and KMPAC +1 »+0, then the real 
angle is 180°(-'1807,and the closest approximation is double 
precision POSMAX. 
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(SMALLMP) 


Double precision product 
of KMPAC d and A; 



Calculation: A(X+Y) 

KMPTEMP<—A 

KMPAC +1 «—A(KMPAC +1) 

A KMPAC 

A*Y(s. p., low order half lost) 

A 'X (d. p.) 

High halfl Ax Ay 

Low half / AA+AY 

[A —A(KMPTEMP) 

KMPAC<— A 
| KM PA C 41 f- 

- L + (KMPAC +1) | 







SUBROUTINES CALLED WHICH ARE 
FLOWED ON OTHER FLOW CHARTS 


MASSPROP 2340 | Updates 


Ree stablishes last display _ 

Chan ges priority _ 

Normal entry to RCS DAP initializat 


2350 Zeroes incremental angles, r; 

biases for roll, pitch, and yav 
2430 Switches from one set of filter 
another 

2190 Tests/sets EXTV BA CT 
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FLAGS 



Meaning When Set 

Meaning When Clear 

Where. 
Set 

Where 

Cleared 

Where 

MAXDBFLG 
(Flagword 9 
bit 12) 

Maximum deadband 
selected 

Minimum deadband 
selected 

8 

8 


N22CRN17 
(Flagword 9 
bit 6) 

Compute total attitude 
errors with respect to 
N22 V6 2 

Compute total attitude 
errors with respect 
to N17 V63 

19 

19 


ATTCHFLG 
(Flagword 7 

LM attached to CM 

LM not attached to 

CM 

13 

13 


DAPBIT 1 
(Flagword 6 

(bit 15, bit 14)»1, 1: enable Saturn control 

Of DAP 

0, 1: RCS A/P 

0,0: no DAP's 

5 

3,4 

2,6, 25 

DAPBIT 2 
(Flagword 6 
bit 14) 

4,5 


6, 25 

V50N18FLG 
(Flagword 3 
bit 15) 

Enable R60 attitude 
maneuver 

Inhibit R60 
attitude maneuver 

18 



NJETSFLG 
(Flagword 1 
bit 15) 

2 jet RCS burn 

4 jet RCS burn 

15 

15 


STIKFLAG 
(Flagword 1 
bit 14) 

RHC control 

CMC control 


18 


NEEDLFLG 
(Flagword 0 
bit 9) 

Total attitude error 
displayed 

A/P following error 
displayed 

19 

18 


RCSFLAGS 
bit 3 

NEEDLER routine 
performs the ini¬ 
tialization functions 
for the FDAI display. 

NEEDLER routine 
does not perform ini¬ 
tialization functions 
for the FDAI display. 

4,21 

20,30 

20 

RCSFLAGS 
bit 2 

First pass of ini¬ 
tialization function 
has been completed. 

First pass of ini¬ 
tialization function 
has not been com¬ 
pleted. 

20 

23 

20 
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DISPLAYS 


Verb- 

Type of 


Where 

V04N46 

Flashing 

Rl: xxxxx DAPDATRll Autopilot 

R2: xxxxx DAPDATR2r Configuration 
R3: J (octal code) 

Sh.7 

V06N47 

Flashing 

Rl: xxxxx. pounds mass of CSM 

R2: xxxxx. pounds mass of LM 

R3: 

Sh. 8 

V06N48 

Flashing 

Rl: xxx. xxdeg. pitch trim 

R2: xxx. xxdeg. yaw trim 

R3: 

Sh. 10 

V06N7 9 

Flashing 

Rl: x.xxxxdeg/sec rate passive 

thermal control 

R2: xxx. xxdeg. deadband passive 
thermal control 

R3: xxxxx. x- or y- axis option 

Sh. 11 
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ERASABLE LOCATIONS USED 


AGC 

Tag 

Meaning 

Engineering 

Units 

AGC 

Units 

AGC 

Scaling 

ACORBD 

Specifies quad pair to be used for 
roll attitude control in RCS DAP. 

+ 1 : B-D quad 
-4096 : A-C quad 



2 +i4 

ADB 

Attitude error deadband 

_ && _ 

rev 

2-1 

AK 

AK1 

AK2 

Attitude errors 

deg 


2-1 

AMGB1 

AMGB4 

AMGB5 

AMGB7 

AMGB8 

Matrix elements which are used 
by RCS DAP to transform infor¬ 
mation from gimbal to control 



2° 

CDUXCMD 

CDUYCMD 

CDUZCMD 

Value to be transmitted to CDU 
IMU error counters and/or to 
FDAI needles. 

deg 

rev 

2 +1 

CDUXD 

CDUYD 

CDUZD 

Values of desired DAP CDU 
angles for automatic maneuver. 

deg 

rev 

2"1 

CPHI 

CTHETA 
CPSI 

Noun 22: New ICDU angles 
and 

Noun 18: Ball angles auto ma- 
neuvers. 

deg 

rev 

2" 1 

DA PDA TR1 
DA PDATR2 

see end of Erasable Locations 




delcdux d 

CDUX change; calculated every 
decisecond. 

deg 

rev 

2” 1 

EDRIVEX 

EDRIVEY 

EDRIVEZ 

Buffer register used in com¬ 
municating DAP attitude errors 
to needles. 

deg 

rev 

2 +1 

HOLDFLAG 

Controls nature of attitude hold 
performed by RCS DAP. 

.•?0: present CDU angles loaded 
into THETA D’s for use as 
new attitude reference. 

=+0: DAP in attitude hold 
c 0: automatic maneuvers 



2 +14 

IAVG 

Average moment of inertia about 
y and a axes 

kg-m 2 

kg.m 2 

2+ 20 

IAVG/TLX 

IAVG/("thrust moment") 

sec 2 

sec 2 

2 +2 

IXX 

Moment of inertia about x axis 

fcg-ifig_ 

kg-m 2 

2 +20 
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ERASABLE LOCATIONS USED 


___ 1 

AGC 

Tag 

Meaning 

Engineering 

Units 

AGC 

Units 

AGC 

Scaling 

J/M 

J/Ml 

J/M2 

S/C inertia to torque ratio - x axis 
S/C inertia to torque ratio - y axis 
S/C inertia to torque ratio - z axis 

(de g/de el¬ 
se c-csec" 1 ) 

(rev/deci- 

sec-csec) 

a , 2 3 

KMJ 

KMJ1 

KMJ 2 

S/C torque to inertia ratio - x axis 
S/C torque to inertia ratio - y axis 
SlC torque to inertia ratio - z axis 

deg/de ci- 
sec 

rev/deci- 

2‘ 13 

KTLX/I 

K: DAP gain factor 

T: thrust 

LX: distance from engine gimbal 
point to c.g. of vehicle 

I: average of moments of inertia 
about pitch and vaw axes 

deg 


CSM^LM: 

1. 07975 
CSM: 

2*4 x 

1.07 9X5 

PMANNDX 

Pitch decode stick command 
(bits 2,1) * 

0, 0 = no maneuver 

0,1 = positive maneuver 

1,0 = negative maneuver 

1. 1 =no maneuver 



2‘ 14 

RACFAIL 

A-C Quad Failures 

(see DA PDATR2 bits 10,4) 



2 + 14 

RBDFAIL 

B-D Quad Failures 

(see DAPDATR2 bits 7.1) 



2* 14 

RMANNDX 

Roll decode stick command 
(see PMANNDX above) 



2* 14 

THETADX 
THETADY 
THETA D7. 

CDU angles in DAP used for atti¬ 
tude errors. 

deg 

rev 

2" 1 

VARK 

Variable gain (for pitch and yaw) 

deg/deg 

rev/rev 

CSM/LM: 
2+2 x 

1. 07975 
CSM-J?* 4 > 
1.07 975 

WBODY^ 

Desired angular rates 

deg/de ci- 
. ,,6£C - 

rev/de ci- 
-SS£ - 

2' 3 

XTRANS 

Used with DAPDATR1, bits 10,7 
+ 1: use B-D quad for x transla¬ 
tions. 

-1: use A-C quad for x transla- 

0: use both quads for x transla- 



2*14 

YMANNDX 

Yaw decode stick command 
(see PMANNDX above) 



2* 14 

l/CONACC 

Reciprocal of roll axis accelera¬ 
tion 

(deg/sec 2 ) _1 

(rev/sec V 1 

2* 9 
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OF PHASE 































(estimate.) 



rate: 







PHASE PLANE LOGIC 
























































































TVC START-UP AND EXECUTIVE ROUTINES 


TVCDAPON Sh. 2 

TVCINIT1 Sh. 2 

DAPINIT Sh. 9 

TVCEXEC Sh. 10 

REDOTVC Sh. 18 

ENABL2 Sh. 20 

CMDSOUT Sh. 21 

EXRSTRT Sh. 22 

MASSPROP Sh. 23 

PRESWTCH Sh. 28 

SWICHOVR Sh. 28 

LOADCOEF Sh. 31 
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Called by T5RUPT from SPSON Allows 
at least . 42 sec for SPS thrust buildup. 
Inputs set by SPSON 
TVCPHASE^l 



Next Sheet 
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From Preceding Sheet 


Update TVC 
Mass 

\ Parameters / 


= 1000 x SPS 
fuel flow rate in 
kg/csec @2+3 

_ TENMDOT in 

tfDOT kg@2 16 

TENMDOT Expected vehicle 
mass after first 


Switch for 
LM-on/LM-off 


filter 

\ coefficients 


filter 

y. coefficients 



Initialize KTLX/I 
to pad loaded 
value in sec+2 @ 
2 +2 x 1. 07975 
for; .CSM/PM; 
sec +2 @2 + 4 x 
1. 07975 for CSM 


~ TVC Start Up and Executive 
■* Routines __ 

- I DOCUMENT NO. 

- COLOSSUS 2E FC -2430 






Next Sheet 
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From Preceding Sheet 




Bypass error needle 
initialization if LM 
is attached 


ERRBTMP contains 
(-ERRORY) in revs <c 
ERRBTMP +1 contaii 
(-ERRORZ) in revs g 
from P40 at SPSON 


[ERRBTMP -frl<-1. 5 degj |ERRBTMP +l<r+l. 5 


1 ERRBTMP^-1.5 deg| [ERRBTMP <- +1. 5 d 
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n Pr 

seeding Sheet 


Test 

bit 13 / 

channel 11/ Set, engi 

ne is on update ma 


| Clear, 

V 


off 1 CSMMASS4—MASSTMP 



Schedule DAPINIT in or 
DAP sample period 
40 msec for CSM 
80 msec for CSM/LM 



APOLLO GUIDANCE AND NAVIGATION 

- TVC Start-up and Executive 

^ Routines __ 
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DAPINIT 
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From Preceding Sheet 


WAITLIST/ 
Task in 
3 csec. 


Schedule ROLLDAP, allowing 
time for completion of 
TVCEXECUTIVE, processing 
of other interrupts, etc. 


(needleup) 


Update 
attitude error 
display 


Inputs: AK, AK1, AK2 - 


MIT INSTRUMENTATION LAB 
CAMBRIDGE. MASS. 

APOLLO GUIDANCE AND NAVIGATION 


DRAWN l / . /iy- - 


Routines 




COLOSSUS 2D 

DOCUMENT NO. 

FC-2430 



APPR'D 

[REV 1 ISHEET11 Of 3fa| 



From Preceding Sheet 


I Set, engine is on 

Time to update gains' 
e Fail, = -0 >+0, not time yet 


/ FIXCW \ 
f Update mass' 
decrement 
v parameters / 
\ Sh. 24 / 


/rVCEX PHS End of phase 0 


^XECCOP^ 


Update mass estimati 
Initialize counter 
MASSTMP in kg @2* ] 


CSMMASS <?-MASSTMP 

VCNTR<=-VCNTRTMP 

V9 7 VCN TR «-VCN TRTMP 


1 Store updated parameters in their 
( permanent location^,- 
J CSMMASS in kg @2 
VCNTR, V97VCNTR in sec @ 2 +1 
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From Preceding Sheet 



Next Sheet 






From Preceding Sheet 


Do not allow 
switchover 
during engine 
SPS engine-off shutdown 
terminate_tailoff 


Set up TVCEXECUTIVE 
restart entry point to return ti 
TEMPSET (TVCEXPHS=3) 



(tempset) 


TEMPDAP +1 < 


Load c. g. correction 
-FCORFRAC I factor 

J (32 +2 for CSM/LM 


@2 for CSM 
(deg/deg) 


Set up TVCEXECUTIVE 
entry point to return to 
CORSETUP 
(TVCEXPHS=4) 
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CNTRTMP" 


One-shot TMC correctior 
finished 


( gG. CORr) 


_ i 

pacttmp d <- 

4 [tempdap (deli 

-PDELOFF + 

P BAR-PDELOFF)] 


/ 

YACTTMIj-j <-YDELOFF + 

4Ctempdap (delybar-ydeloffO 


Pitch TMC loop 
correction in re 
@2° x 1.07975 


Yaw TMC loop 
correction in re' 
@2° x 1. 07975 


Next Sheet 
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From Preceding Sheet 


(COR COP 




•VCEXPHS 

/ return to CORO 
] (TVCEXPHS =5) 


Set up TVCEXECUTIVE restart entry point to 
return to CORCOPY +1 


X 

^CORCOPY +j} 


YACTOFFg^ 

YDELOFF^ 


-YACTTMPg 
- YACTTMP 


Store new values for pitch TMC loop 
correction in revs @2® x 1. 07975 


Store new values for yew TMC loop 
correction in revs @ 2 0 x 1. 07975 


/tvcexphs 

LEE] 


Set up TVCEXECUTIVE restart entry point to return to 

CNTRCOPY 

(TVCEXPHS=6) 
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TVC Re; 


Package 



Schedule 
EXRSTRT to 
start after 
CMDSOUT but 

PITCHDAP 
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Restart occurred du 
PCOPY or YCOPY 
-1 subroutine 





From Preceding Sheet 







(CMDSOUT 


Called by T5RUPT froi 
ENABL2 






From Preceding Sheet 



Disable stroke 
test. New verb 
68 entry is 
required to repeat 
stroke test 


(exrstrt^ 


Go to location whose 
address is contained 
in location TVCEXPHS 
of TVCEXADR table 


TVCEXPHS 

Value 

Entry 

Point 

Sheet 

No. 

i 

EXECCOPY +1 

12 

2 

1SHOTCHK 

13 

3 

TEMPSET 

14 

4 

CORSETUP 

15 

5 

CORCOPY +1 

16 

6 

CNTRCOPY 

17 
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Next Sheet 
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From Preceding Sheet 
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From Preceding Sheet 


PSI 333 i ---PSI333 - 1 1 Decrement Index PS1333 

PHI333^ PHI333 - 1 sign (PHI333)| Decrement magnitude of Index PH1333 


- CSMMASS WEIGHT/G<— CSMMASS + LEMMASS 




26850(kg- mVl. 96307(rn )• m LM 







Step 3: Compute IXX (kg- rn ), IAVG(kg-ni ), and IAVG/TLX( 



( pres witch ) 
/4wichovr 

/ Switch to 
^Low-bandwidth 
^CSM/LM da: 
Sh. 28 


CSM/LM V46 Switchover from 
high-bandwidth filter to 
low-bandwidth filter. 


via POSTJUMP 


CH/ Allow interrupts, and terminate 
verb 46 



Next Sheet 
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DOCUMENT NO. 

FC-2430 

DOCMR 


APPR'D 







Zero: 

ptmpi d 

PTMP6jj 

ytmpi d - 

- YTMP6j-j 


Zero temporaries for pitch and yaw filtej 


KTLX/I<-[EKTLX/l +2] Set gain to low-bandwidth pad loaded v 

-1-in sec' 2 @2 +2 xl. 07975 for CSM/LM 


/S40. 15 +7 \ Input: 9 + ? 

Compute \ KTLX/I in sec' 2 @ 2 +2 x 1. 07975 for CSM/LM 
variable > 

ftj.f W lAVG/TLXfc.s.cW* 

'-F ' Output: +2 

VARK @ 2 * Xl. 07975 for CSM/LM 


(IT INSTRUMENTATION LAI APOLLO GUIDANCE AND NAVIGATION 
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of the released version of 
COLOSSUS 2, these values are 
as follows: 

N10 +10 <-+. 99999 

N10 +11 *-. 3285 

N10 +12 <-.3301 

N10 +13 <--.9101 

N10 +14 *- +.8460 
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SUBROUTINES CALLED WHICH ARE 
FLOWED ON OTHER FLOWCHARTS 


Subroutine 

Name 

Flow 

Chart 

Description 

Where 

Called 

S40.15 

2370 

Updates gain parameters 

Sh. 4, 12, 29 

NEEDLER 

2370 

Attitude error display 

Sh. 7, 11 

ROLLDAP 

2460 

TVC roll control 

Sh. 11 

PCOPY 

2440 

Pitch copy 

Sh. 19 

YCOPY 

2440 

Yaw copy 

Sh. 19 


FLAGS 



Meaning When 

Meaning When 

Where 

Where 

Where 

Name 

Set 

Clear 

Set 

Cleared 

Tested 

SWTOVER 

Switchover has 

Switchover has not 

Sh. 29 

Sh. 3 


Flagword 9 
bit 15 

occurred 

occurred 




RCSFLAGS 

Initialize needle 

Needle drive 




bit 3 

drive 

initialized 

Sh. 7 



DAPBIT1 

Both set: Saturn 

DAPBITl=(5l TVC 



Sh. 10 

Flagword 6 

DAP controls vehicle 

DAPBIT2=l/ DAP 




bit 15 

attitude. 

controls vehicle 





DAPBIT1 = 1\ TVC 

attitude 




DAPBIT2 

DAPBIT2=0/ DAP 

Both clear: no 



Sh. 10 

Flagword 6 

controls vehicle 

DAP control of 




bit 14 

attitude 

vehicle attitude 
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ERASABLE LOCATIONS USED 


Jrate error used for deg 

offset (pitch) 

Jrate error used for deg 

offset (yaw) 

Increments VARSTO+7 sec^/kj 
if LM-on APS- 
only configuration is 
specified 

SPS propellant flow rat< kg/cse( 


(body attitude error) 


Updated version of 
EKTLX/I (see pad- 
loads) 


AGC 

TAG 

GSOP 

Symbol 

Meaning 

Engineering 

Units 

AGC 

Units 

AGC 

Scaling 

OGANOW 


Roll angle for roll 
autopilot; updated 
version of CDUX 

deg 

rev 

2 1 

OGAPAST 

pacttmp d 


previous value of 
OGANOW (past CDUX 
value) 

Pitch trim-correction 
(temporary storage) 

deg 

deg 

rev 

2- 1 

2°x 

1.07975 

PCDUYPST 


Past CDUY value 
(pitch) 

deg 

rev 

2* 1 

PCDUZPST 


Past CDUZ value 
(pitch) 

deg 

rev 

2 1 

PCMD 


Incremental pitch 
actuator command 

deg 

rev 

2° x 

1. 07975 

pdeloff d 

PDELOFF 

Trim correction 
(pitch) 

deg 

rev 

2° x 

1.07975 

perrb d 


Body attitude error 
(pitch) 

deg 

rev 

2' 1 

2 + 2 

REPFRAC 

K cg 

Updated version of 
EREPFRAC (see 
pad-loads) 

dimensjon- 

dimension¬ 

less 

2 + 15 

.+ 16 

TEMP333 


Mass (temporary) 

kg 

kg 

TENMDOT 


Amount of mass lost 
due to 10 seconds of 
SPS firing 

kg 

kg 

2 

TVCPITCH 


Actuator command 
(pitch) 

deg 

rev 

2° x 

1.07975 

TVCYAW 


Actuator command 
(yaw) 

deg 

rev 

2° x 

1. 07975 

VARK 

VARK 
or K z 

Gain for pitch and 
yaw channels 

deg/deg 


For CSM 

2 +4 x 

1.07975 

For 

CSM/LM 
2 +2 x 
1.07975 

VARSTO +1 


IAVG breakpoint 

kg- m 2 

kg- m 2 

2 +20 
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AGC 

GSOP 


Engineering 

Units 

AGC 

AGC 

TAG 

Symbol 

Meaning 

Units 

Scaling 

VARSTO +2 


IAVG/TLX breakpoint 

sec 2 

sec 2 

2 +2 

VARSTO +7 


IAVG/TLX slope for 

sec 2 /kg 

sec 2 /kg 

2' 12 



CSMMASS less than 
breakpoint value 



„+13 

VCNTR 


Updated version of 

sec 





VCNTRTMP 



2+1 3 

VCNTRTMP 


Counter 

sec 








o+13 

V97 VCNTR 


Updated version of 
VCNTRTMP 

sec 

sec 


WEIGHT/G 


Updated version of 
CSMMASS and 

kg 

kg 

2+16 



LMMASS 




YACTTMP D 


Yaw trim-oorrection 

deg 

rev 

2° x 



(temporary storage) 



1. 07975 

YCMD 


Incremental yaw 

deg 

rev 

2° X 



actuator command 



1.07975 

ydeloff d 

YDELOFF 

Trim correction (yaw) 

deg 

rev 

2° x 
1.07975 

yerrb d 


Body attitude error 

deg 

rev 

2- 1 



(yaw) 





FIXED LOCATION USED 


AGC 

TAG 

GSOP 

Symbol 

Meaning 

Engineering 

Units 

AGC 

Units 

AGC 

Scaling 

FCORFRAC 


c. g. correction 
factor 

dimension- 

dimension¬ 

less 

CSM/LM 

2 +2 

CSM 

2 +3 
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PAD-LOADED ERASABLES 


K: DAP gain factor 
T: thrust 

LX: distance from 
engine gimbal point 
to c. g. of vehicle 
I: average of moments 
of inertia about pitch 
and yaw axes 


Actuator trim value deg 

(pitch) 


A POLIO GUIDANCE ANO NAVI GAT 10 


PRGMR 

ANALST 


COLOSSUS JO 




TVC DAP 


PXTCHDAP Sh. 2 

FWDFL.TR Sh. 4 

PRECOMP Sh. 7 

PCOPY Sh. 8 

YAWDAP Sh. 9 

YCOPY Sh. 13 

ERRORLIM Sh. 15 

RLIMTEST Sh. 15 

ACTLIM Sh. 16 


Special convention: 

TVCDT = 80 msec for CSM/LM 

40 msec for CSM 


MIT INSTRUMENTATION LAI 
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PRCMR TfifrU&L 


DOCUMENT NO. 

COLOSSUS 2D FC-2440 

DOCMR C.T.a 


tPP»' f -&<L.*rtW' 

/yaffd 

REV T |SHEET 1 Of 19 



Next’Sheet 







MCDUYDOT 


CDUY ir 


* TVCD r r 

COSCDUX,COSCDUZ, 
SINCDUX® 2 +1 


PE RRB + OMEGA YC -OMEGAYB 


Attitude error = 

S rate error (“yc = 
command rate) in 











DAP1 < 
DAP2 •< 
DAP3 <i 
CMDTMP « 
DELBRTMP < 


• N10- ERRBTMP_ + TMPl^ 


“ZZlCOLOSSUS 2D FC-24- 











POFFSET' 




Next Sheet 






rrom Preceding Sheet 


TMPlg;—2( [N10 +l].ERRBTM^j- [N10 +3]OAPl rJ ) +TMP2 D 
TMP2,5<— [N10 +2 ]-ERRBTMP d - [N10 +4].DAP1 d 


TMP3^~2([N10 +6]-DAP] t) -[N10 +8D]-DAP2 d )+TMP^ ) 
TMP4jJ— [N10+7]-DAP1 d -[N10 +9D] • DAP2_ 


.TMP^INIO +11D]*DAP2j-j - [NIO + 13D]*DAP| } ) +TMP^ 
TMPPjj*—.[ NIO +12D].DAP2 d - [NIO +14D] • DAP3 D 


. rq[_ 



















Next Sheet 




From Preceding Sheet 


rate / Output: 

-—-T A, unchanged if< 2. 33 deg. 

Sh. 15 / 0 otherwise 
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PRGMR /f 



PWfll 

MWffj 



j zr_ _ - j_f_+ ,c°s <f • f _ 

OMEGAZB^—4(COSCDUZ • SINCDUX • MCDUYDOT)-2(COSCDUX'MCDUZDOT) 
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From Preceding Sheet 


/fwdfltrX 

/ Filter 
' computation 
. for present 


ERRBTMP d in revs/sec @ 2 
TMP1 d , TMP3 d , TMP5 d in 
(TMP5p. not used if LM off) 


'Output: 

CMDTMPp (actuator command)=present output 
including variable gain package (VARK) @ 2° x 1.07975 


|cmdtmp d <- cmdtmp d +ydeloff d 


— TVCYAW + CMDTMP - YCMD 


\ Set Bit 12f Release TVCYAW counts to actuator 


APOLLO GUIDANCE ANO NAVIGATION 


IAHAIST. Jli 
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From Preceding Sheet 
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DOCUMENT 






AK2 S 

yerrb d 

YCMD„ 


ERRBTMPj 

ERRBTMPj 

CMDTMP q 


S 

D 


DELYBARq <— DELBRTMP D 



ydapend) 



In revs @ 2' 1 
In revs @ 2 5 




In revs @2' 


| YCOPY no 1< 
needs restar 
I protection 


.RESUME/ 








ERRORLIM 























J 







































auto^, l ot 

•tf’/tQ colo •e.'bu's nc pc- 2.460 



PRELAUNCH INITIALIZATION 


MAJOR SUBROUTINES AND EX1 


GTSCPSS1 

GOESTIMS 

PIPACHK 

PIPATASK 

PIPJOBB 

ESTIMS 

CHKCOMED 

SETGWLST 

ALLOOP 

ALFLT 

ALWAYSG 

VALMIS 

TORQUE 

CKOPTVP 
COMP VER 
SYSTEST 
EXDAPOFF 
REDO 

LFTFLGON 

CHAZFOGC 

AZMTHCG1 

OVERFFIX 


(P01) OPTIMUM GYROCOMPASSING 
WAKE ESTIMS 

TORQUE FLATFORM IN PREPARA 1 
START PIPJOBB AT 5.12 SEC INTE 
PIPA CHECK ROUTINE 

DETERMINE IF LIFT-OFF HAS OCC 
SET WAITLIST CALL OF ALLOOP 
READ & CLEAR PIPAS EVERY 1 SE 
PROCESS PIPA PULSES READ IN A] 
RESTART ENTRY TO ALFLT 
COMPASS AND ERECT 
DISPLAY VERTICAL DRIFT 
CALCULATE EARTH'S ROTATION E 
DISPLAY VERTICAL GYRO DRIFT 

OPTICAL VERIFICATION OF GYRO 

SHUT DOWN AUTOPILOT 
PRELAUNCH SERVICE GYROCOMP^ 
(V75) INDICATE LIFTOFF HAS OCC 
(V78) UPDATE PRELAUNCH AZIMU' 
SET NEW AZIMUTH 
ZERO A SET OF REGISTERS 
FIX OVERFLOW IN MPAC Q 


IMUSTLLG 
COA ALIGN 
POSN17C 
EARTHR* 
PROUT 
SOME RR2 
SOMEERRR 
EARTHR 


STALL UNTIL IMU OPERATION DO! 
COARSE ALIGN IMU TO ZERO ANGI 
SET SM COORDS TO LAUNCH ALIGE 
DO EARTH RATE COMPENSATION 
DELAY UNTIL GYRO TORQUING DO 
SEND 1601 ALARM AND EXIT 
SEND 1600 ALARM AND EXIT 
DO GYRO TORQUING FOR EARTH R 
































































































































































































































PUSH LIST LOCATION CONTENTS OP LOCATION DOCUMENT SYMBOL 

PLlOp Z5W(A4 GEORGEJ-ANSx) ZSANGXp 

PL1Z„ ZSINf^GEORGEJ-ANGY) Z SANGYp 

PUAj ZSINOSi GEORGEJ-ANGi) ZSAN6Z, 

PL1G 0 COSfi* GEORGET-ANGX) CANGXj, 

PL18p COS^GEORGET-ANGr) CANGY, 

PLZO„ COS(!^ 3E0RGE7- ANSZ) CANGlp 
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i&s. 

Ptl - EARTH ORBIT 

INSERTION MONITOR 

“ibuBriKT.: 

turn 


S/MK5 

colossus i a fc-2540 

rTv i 2? 
















































































































































































































































































































































CHECKS STATUS 


GET PRESENT TIME FROM COMPUTER CLOCK 
EXTRAPOLATE CSM/LEM STATE VECTOR TO TDEC1 
CHANGE JOB PRIORITY 
AUTOMATIC OPTICS ROUTINE 



RELEASE MARK SYSTEM 

RESERVE INTEGRATION ROUTINE 

ZERO INPUTS TO DIGITAL AUTOPILOT 

FORM RETURN ADDRESS 

ATTITUDE MANEUVER ROUTINE 

RENDEZVOUS FINAL ATTITUDE 

TURN OFF UPLINK ACTIVITY LIGHT 

COMPUTE SINES AND COSINES OF IMU GIMBAL ANGLES 

COMPUTE CHANGES IN IMU GIMBAL ANGLES 

STABLE MEMBER TO NAVIGATION BASE 
T RANSFORMATION 

TURN ON OPERATOR ERROR LIGHT 
CLEAN OUT ALL MARK DISPLAYS 

COMPUTE STATE VECTOR DEVIATIONS 
INCORPORATE STATE VECTOR DEVIATIONS 
DELAY JOB FOR A CERTAIN TIME 
WAIT FOR VHF RANGE DATA 
TURN OFF TRACKER FAIL LIGHT 
TURN ON TRACKER FAIL LIGHT 
I/O COMPLETE AND GOOD 
I/O COMPLETE BUT BAD 

ANGULAR MARK DATA TO NAVIGATION BASE 
COORDINATES 

NAVIGATION BASE TO STABLE MEMBER COORDINATES 






























PROGRAM CONSTANTS 























































































































PRECEDING 



























































BLANKET 


REGISTERS 



LAT-LONG 

MK RE LEAS 

INTSTALL 

INTEGRV 

GETUM 

R-TO-RP 

BVECTORS 

INCORP1 

INCORP2 

CSMPREC 

LA LO TORY 


(CONIC) 

BLANKS OUT CERTAIN DISPLAY R] 

AUTOMATIC OPTICS DRIVING ROUTINE 
ADVANCED GROUND TRACK ENTRY POINT OF R52 
CONVERT FROM PLANETARY TO BASIC REFERENCE 
COORDINATES 

CONVERT RADIUS VECTOR TO LAT, LONG, AND ALT. 
RELEASE MARK SYSTEM 
RESERVE INTEGRATION ROUTINE 

EXTRAPOLATE CSM STATE VECTOR TO TIME TDEC1 
CONVERT SIGHTING ANGLES TO LINE OF SIGHT VECTOR 
CONVERT FROM BASIC REFERENCE TO PLANETARY 
COORDINATES 

COMPUTE MEASURED TO ESTIMATED POSITION 
DEVIATION AND MEASUREMENT GEOMETRY VECTOR 
COMPUTE STATE VECTOR CHANGE 6X 
INCORPORATE STATE VECTOR DEVIATIONS 
EXTRAPOLATE CSM STATE VECTOR TO TIME TDEC1 
(PRECISION) 

CONVERT LAT, LONG, AND ALT TO RADIUS VECTOR 
COMPUTE EARTH OR MOON RADIUS 








!SPfS*-BSS 


i-ORBITAL NAVIGATION 


MR iiDcTUi 


colossus n 












_ pae- ORBITAL NAVIGATION 

183tPMj 

>J “ (colossus n PC-2590 




















ERASABLE LOCATIONS 


(CONT' 


£ag 

GSOP 

SYMBOL 

MEANING 

ENGINEERING 

UNITS 

UNITS 

AGC 

SCALING 

S22UMRL 

U 

WORK MATRIX 



VARIABLE 

S22RHO 

p 

VARIABLE USED IN INITIALIZING W g 



2 30 /2 28 

SMITTTT 

5fi T 

VARIABLE USED IN INITIALIZING W g 



VARIABLE 



RETURN LOCATION FROM S22. 1 


(INTEGER) 


9DWJ 

j 

J INDEX 


(INTEGER) 

2 28 

9DWI 

I 

I INDEX 


(INTEGER) 

2 28 

9DWP 

p 

P INDEX 


(INTEGER) 

2 28 

EMATRIX 

E 

1ST PART OF SOLUTION MATRIX 



VARIABLE 

9DWN 

N 

N INDEX 


(INTEGER) 

2 28 

WORKW 


TEMPORARY STORAGE REGISTER 



VARIABLE 

XTEMP1 


K INDEX 


(INTEGER) 

2 14 


PROGRAM CONSTANTS 


AGC 

SYMBOL 

MEANING 

ENGINEERING 

va £|nd 

AGC 

SC AUNG 

9DWID 


DECIMAL 2 

2 

(INTEGER) 

2 14 

DEC1B2 

9DW26D 

IMUVAR 

SCTVAR 

var sct 

DECIMAL 1 

DECIMAL 52 

IMU ERROR VARIANCE 

SCT ERROR VARIANCE 


(INTEGER) 






AGC 

G x SOP 

MEANING 

ENGINEERING 
VALUE AND 
UNITS 

va ££an d 

AGC 

SC AUNG 

VALUE 

WORBPOS 

WORBVEL 

■V 

ORBITAL NAVIGATION W-MATRIX 
POSITION INITIAUZATION VALUE 

ORBITAL NAVIGATION W-MATRIX 

1 / TO > 

METERS 

METERS/CSEC 

219 


S22WSUBL 


VELOCITY INITIALIZATION VALUE 

ORBITAL NAVIGATION W-MATRIX 

^determined! 

METERS 

2 19 


| RPVAR 

var rp 

LANDMARK INITIAUZATION VALUE 

VARIANCE OF PRIMARY BODY 
RADIUS ERROR 

METERS 2 

2 28 





2-ORBITAL NAVIGATION 

lcOLOS8U8 n PC-2590 

































































































>IISPRDT2 

AARKINDX 

5TARIND 

LANDMARK 

HORIZON 

STARCODE 

STARSAV2 
(ALSO TAGG 
US) . 

IDOFLMK 

MARKTIME 

REFSMMAT 

POINT VSM 
SCAXIS 

R60ADRS 

TEMPFLSH 

MARKDATA 


TRUNNION 

UCLSTAR 


TRUNBIAS 

DELTAQ 

VARIANCE 

DELTAX 

DELTAX+6 

N49DISP 

N49DISP+6 


RESTART PRIORITY REGISTER 
|NUMBER OF MARKS WANTED REGISTER 
INDEX TO BESTI OR BESTJ 

TIVE ADDRESS OF 
ES 

Landmark data display noun 
[horizon data display noun 

DISPLAY NOUN 
Y STORAGE OF STAR 1 UNIT 

LANDMARK ID NUMBER 

TRANSFORMATION MATRIX: BASIC 
REFERENCE TO STABLE MEMBER 
COORDINATES 
DESIRED TRACK AXIS 

IS TO BE ALIGNED W 

DESIRED ADDRESS OF ' R60 CALL' 
RESTART RETURN ADDRESS 
ADDRESS OF MARK DATA STORAGE 


[measured TRUNNION ANGLE 

"aberration 


CSM VELOCITY VECTOR 


UNIT VECTOR 

| GEOMETRY OF MEASUREMENT MATRIX 
I CALIBRATION ANGLE FOR SEXTANT 
| MEASURED AND ESTIMATED DEVIATION 
VARIANCE OF MEASUREMENT ERRORS 
| STATE VECTOR POSITION DEVIATIONS 
STATE VECTOR VELOCITY DEVIATIONS 

DISPLAY NOUN FOR DELTAX 
DISPLAY NOUN FOR DELTAX+6 

RETURN ADDRESS FROM POINTAXS 




(INTEGER) 

[(INTEGER) 

(INTEGER) 

(INTEGER) 

(INTEGER) | 
[(INTEGER) 
(INTEGER) 


(INTEGER) 

(INTEGER) 

(INTEGER) 


NAUT. 
FEET/SEC 

FEET/ SEC 


METERS 

METERS 2 

METERS 


METERS 

METERS, 


1 > . •> a 

M V 




PZ3- CISLUNAR 
MIDCOURSE NAI6ATI0 N 

COLOSSUS 2D 


FO 2600 






ERASABLE LOCATIONS USED (CONTINUED) 


MEANING 


ENGINEERING 


ALTITUDE 

LATITUDE 

LONGITUDE 

ALTITUDE DISPLAY NOUN 
LONGITUDE DISPLAY NOUN 
SUBROUTINE RETURN ADDRESS 
TIME FOR INTEGRATION 


LANDMARK/HORIZON LOCATION 
VECTOR 

CSM TO LANDMARK/HORIZON 
VECTOR 

CSM CONIC POSITION DEVIATION 
CSM REFERENCE CONIC POSITION 

CSM CONIC VELOCITY DEVIATION 
CSM REFERENCE CONIC VELOCITY 


(INTEGER)] 

CSEC 

METERS 

METERS 

METERS 

METERS 

METERS 
METERS/ | 


RETURN ADDRESS FROM H 

(DEFINE HORIZON 
COORDINATE 
SYSTEM 


>F LATITUDE (FOR GETERAD) 




PZ3- CISLUNAR 

midcourse navigation 


FC-2600 







FT/SBC 


































V94 (R64) 
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FC-2606 






SUBROUTINES CALLED WHICH ARE 
FLOWED ON OTHER FLOWCHARTS 


Subroutine 

Name 

Where 

Flowed 

Description 

Where 

Called 

ALM/END 

FC-2190 

Turns on operator error light 

Sh. 2 

CHECKMM 

FC-2030 

Checks major mode 

Sh. 2 

CLEANOUT 

FC-2190 

Causes restart 

Sh. 2 

DOWNFLAG 

FC-2070 

Clears flag 

Sh. 2 

PHASCHNG 

FC-2030 

Changes phase for restarts 

Sh. 2 


FLAGS 



Meaning When Set 

Meaning When Clear 

Where 

Set 

Where 

Cleared 

Where 

Tested 

AG 

|' . j 

V94 allowed 

V94 not allowed 


Sh. 2 

Sh. 2 
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erasable locations 


















VflUT FDR GROUND COORDINATION. 
RDM OTHER PROGRAMS,THEN S. 



























EXTERNAL DELTA VELOCITY 

“FC-2620 

































































































IGNITION (TTOGO) 


ILE CLOKTASK 


TASK CONTINUES RUNNING 
I EACH SECOND TO UPDATE 



























































SS^TTP,.^! 

s ,,/aF o-\ INPUT: RFWS3, VP/S53, INT1MC TBMM, UN RM , RAOT: 

’DATZ PASSIVE: \ OUTPUT; RTAW, VPAU-(,OELVLVt, on.UEET3,V'TPRIME 



FC- 2630 

























































































TIME OF TP I MANEUVER 
IGNITION TIME OF MANEUVER 
DESIRED LOS ANGLE AT TPI 

NUMBER OF INTEGRATION OFFSETS; 0 - CONIC. 2 = PRECISION 
DELTA TIME BETWEEN ASSIGNED AND COMPUTED TPI TIME 
INPUT TIME TO INTEGRATION 
AV FOR TPI MANEUVER 

ANGLE TRAVERSED BY PASSIVE VEHICLE FROM 


CENTISECS. 2 
CENTISECS. 2 
REVOLUTIONS 2 

CENTISECS. 2 
CENTISECS. 2 

REVOLUTIONS 2 


COS OF CENTANG 

SIN OF CENTANG 

STATE VECTOR POSITION VALUE 

PASSIVE VEHICLE POSITION VECTOR AT TPI TIME 

PASSIVE VEHICLE VELOCITY VECTOR AT TPI TIME 

STATE VECTOR VELOCITY VALUE 

INPUT TIME TO INITVEL ROUTINE 


REVOLUTIONS 2 
REVOLUTIONS 2 
METERS 2 

METERS 2 

CENTISECS. 2 


TIME FROM TPI TO TPF 
RENDEZVOUS TIME 
MAGNITUDE OF AV AT TPI 
MAGNITUDE OF AV AT TPF 

PASSIVE VEHICLE POSITION VECTOR AT TPF TIME 
PASSIVE VEHICLE VELOCITY VECTOR AT TPF TIME 
VELOCITY AT TARGET AFTER MANEUVER 
MANEUVER VELOCITY REQUIRED 
OFFSET TARGET POSITION VECTOR 
SHIFT COUNTER; -2 FOR EARTH ORBIT, -10 FOR 
LUNAR ORBIT 

SHIFT COUNTER; 0 FOR EARTH ORBIT, 2 FOR 

ES-^S. p tT6^M> s incorporated since east 
ITERATION COUNTER FOR S33/34.1 
At UPPER LIMIT FOR CURRENT ITERATION- 
POSITION VECTOR OF ACTIVE VEHICLE AT TPI 
VELOCITY VECTOR OF ACTIVE VEHICLE AT TPI 


MANEUVER 


UNIT LINE OF SIGHT VECTOR 

UNIT NORMAL VECTOR TO ACTIVE VEHICLE'S PLANE 
DIFFERENCE BETWEEN DESIRED AND COMPUTED 
ELEVATION ANGLE 
TEMP. STORAGE FOR DELEL 
CURRENT ITERATION'S VALUE OF At 
POSITION VECTOR OF ACTIVE AT TPI TEMP. STORAGE 
VELOCITY VECTOR OF ACTIVE AT TPI TEMP. STORAGE 
POSITION VECTOR OF PASSIVE AT TPI TEMP. STORAGE 
VELOCITY VECTOR OF PASSIVE AT TPI TEMP. STORAGE 
POSITION VECTOR AFTER INTEGRATION UPDATE 
VELOCITY VECTOR AFTER INTEGRATION UPDATE 
CENTRAL ANGLE TRAVERSED BY ACTIVE FROM TPI 


CENTISECS. 2 

CENTISECS. 2 

M/CSC 2 

M /CSC 2 

M/CSC 2 

M/CSC 2 


REVOLUTIONS 



METERS 2 

REVOLUTIONS 2 


REVOLUTIONS 2 
CENTISECS. -2 
METERS 2 

M/CSC 2 

METERS i 2 


REVOLUTIONS 


TIME INPUT TO INTEGRATION ROUTINE 

PRESENT VELOCITY INPUT TO INTEGRATION ROUTINE 

PRESENT POSITION INPUT TO INTEGRATION ROUTINE 


CENTISECS. 

M/CSC 

METERS 

















COLOSSUS 








PatoPROGg) 













PRELIMINARY 





















COMMON TARGETING SUBROUTINES 


MAJOR SUBROUTINES AND EXTERNAL ENTRY POINTS 


INITVEL 

HAVEGUES 

VECSHIFT 

SHIFTR1 

GET+MGA 

GET. LVC 

PERIAPO 

PERIAPOl 

SELECTMU 

PRECSET 

LEMSTORE 

CSMSTORE 


Sh. 4 
Sh. 4 
Sh. 10 
Sh. 10 
Sh. 11 
Sh. 12 
Sh. 13 
Sh. 13 
Sh. 14 
Sh. 15 
Sh. 15 
Sh. 15 


MIT INSTRUMENTATION LAB 
CAMBRIDGE. MASS. 

APOLLO GUIDANCE 

AND NAVIGATION 



Common Targeting Su-ifpi$ine.l 




V v 1 v 

ANALST*^^ - 



'document no. 

DOCMR . _ 


roT.o«'>r , s 2i) 

...... 

APPR’O-P-V-UtYfl .r..Tu 

umA 

>y 

_■ 







FKCO 


■-—<-r | INITIALIZE OFFSET VECTOR 

[ Ey(tz.) | e qoM- TO TARGET VECTOR . 

' L ---1 £ is UNIT VECTOR 

!c(tiK«iT* *(*') 1 UMIT I NORMAL TO C(t,'| AND 'iff-l) ■ 

^ -1 0 IS ANCLE BETWEEN 

* = cCt-OimiT* C t (~EQhhit | t (^ and c T (tO- 



CULATE t, • -1---F-1 ROTATE Elt i) INTO P 

| C(tQ - r(L,-)(E(L,)-CpCLQ} »n.t| 0(r aKJD 

I ON FIRST PASS ONLY ROTATE Et(C,)| 

IN THE SAME MANNER BY SEtYiMG 
| IT EQUAL TO THE NEW _1 

r , ' I INITVEL ASSUMES PLANE 

tf-fotJ-fc-EttOj | cl|ANGE QF L£SS Tl(AN 


/ INTEORVS \ INPUT: 
/INTEGRATE STATeX 
\VECTOR UPTOt-i / OUTPUT 


OFFSET VECTOR 







ION VECTOR, IN METERS , AT 2 Z . 
.ITT VECTOR,IN METERS/CSGC, AT ?J . 
THE TRANSFER ANGLE FROM THE INIT 
T VECTOR VS LESS THAN OR GREATER TV 


3)RTARG V = E t (0 l THE 


„ IN METERS/CSEC , AT 2’. THIS 


velocity-to -be -GAINED EQUATIONS. 

2) RTARG v = Etti), THE COMPUTED OFFSET TARGET VECTOR , IN METERS , A' 

3) VTPRIME v <■ i T (t,], THE FINAL PRECISION VELOCITT VECTOR RESULTING Ff 

PRECISION UPDATE OF THE INITIAL POSITION VECTOR AND 

INITIAL VELOCITY VECTOR * T 1*11 IF N,*0 . IT IS THE FINAL CO 
VECTOR RESULTING FROM A CONIC UPDATE OF E(L,1 «jo C(t IF N, = 


4) COG A * cot r , COTANGENT OF FLIGHT PATH ANGLE OF'THE VECTORS r(tO AND Vt(tO I 
MEASURED FROM THE VERTICAL, AT 2‘. 

7) NORMSW « f-i , A FLAG , IS CLEAR IF THE TARGET VECTOR C T tt»> LIES OUTSIDE OF 

















REPLACE intermediate value of offset target vector 

8Y A VECTOR OF EGUAL LENGTH BUT ORTHOGONAL TO -A A 
IN THE PLANE OF [(tj) »ND is. THAT IS, c(t,) IS 
ROTATED ABOUT THE ORIGIN , IN THE PLANE OF E (t,) AND is 
UNTIL IT IS IN THE PLANE DEFINED BV E (t,) AND Y(tl) . 


SINCE IS INITIALLY SET EQUAL 

t T (ti) , this OPERATION (PERFORMED 0 
FIRST PASS ONLY) IS EQUIVALENT TO 


s»= rfft(t 1 ){4*E(t,)|) INITVEL ASSUMES THAT IN THE 

_ _ U -- CALCULATION OF S G THE PLANE 

GEOMSGN-- SIGN(RZVEC v -[uN v ARlVEC v ]) CHANGE IS NEVER MORE THAN 90* 












1 PRECEDING PAGE 


E OFFSET VECTOR. 


LAMBERT INPUT: 

1) RIVECv = c(t,) ,the initial position vector 

2) RZVEC, =E(tii , INTERMEDIATE VALUE . 

3) TDESIRED,= fc„, DESIRED TRANSFER TIN.^. 

4) GEOMSGN- S G , A FLAG, IF POSITIVE O«l«0* IF NEGATIVE ©> 190 . 

5) VTARGTAG S - N, , A FLAG , IF NON-ZERO 1C T (0 IS NOT CALCULATED, 
fcl GUESSW *> F,, A FLAG, IF SET cot V IS NOT INPUT. 

7) C06A„= co+r,AN INITIAL GUESS IFF, IS CLEAR, 
e) NORMSW =Fj , A'FLAG, IF CLEAR 4 IS CALCULATED 
7) UN V = 

1 



_ VECTOR , NORMAL TO c(t^ AND 

INDEX REGISTER CONTAINING VALUE TO SELECT/a-TABLEJ 
11) ITERCTR, - L«»« , ITERATION COUNTER . 

LAMBERT OUTPUT'. 

» VELOCITY REQUIRED AT TIME 

^ARRIVE AT THE OFFSET POSITION 
MANNER AT TIME 
3 VTARGET v * X T (t^, VELOCITY AT THE OFFSET POSITION. IF 
N,«0 THIS VALUE IS CALCULATED BY LAMBERT AND 
IS SUBSEQUENTLY USED - IF N, *0 THIS VALUE IS NOT 
CALCULATED BY LAMBERT AND THE VALUE SUBSEQUENTLY 
D IS THE OUTPUT OF INTEGRVS . 

Y, VALUE CONVERGED TO BY LAMBERT 
4) SOLNSW -f j, A FLAG, IF CLEAR T 


A CONIC 


E SOLUTION IS VALID. 


STORE THE VELOCITY IN ITS OUTPUT LOCATION- 

FOLLOWING THE LAST PASS THRU THE LOOP THIS VALUE 
N THE VELOCITY-TO-BI 


:-GAINED EQUATION - 


, r __ITERATION COUNT IS <>, THEN 

PROGRAM PREPARES TO RETURN AFTER 
A SINGLE CONIC CALCULATION. 


IF INTEGRATION ROUTINE ISBEIN& 
USED RUT THIS ROUTINE DO SLEEP 


CHECK IF THE \ ut , T n INTEGRATION IS AVAILABLE 

INTEGRATION ROUTINE") |( - M jn =r ; R A.TION ROUTINE IS NOT 
ISBEING USED 


1 THE INTEGRATION ROUTINE l_ 
NOW RESERVED FOR THIS JOB. 


TO NEXT SHEET 


IF INTEGRATION ROUTINE IS NOT 
BEING USED RESERVE ITS USE FDR 
THIS ROUTINE BY SETTING THE FLAG 
INTFLA &2 • 






COMMON TARGETING SUBROUTINES 

t4t INITVCI. , M'DC-IM 
- PER IA PC. SELECTMU.PKECSET 

COLOSSUS 2D FC-26-11 
.k^aJSi — 2 -----—— 










WOULD COME HERE DIRECTLY IF N, *= <J) . lb 
CASE RTARGy STILL CONTAINS THE INPI. 
VALUE WHICH IS , FOR N»= 4> , THE OFFSET VI 


□ REQUIRED VELOCITY Yt(Li) iTHE 01 
OF LAMBERT) AND THE EXISTING 
VELOCITY Y(L,). 

STORE Y.t(t*),THE FINAL VALUE OF TH 
FINAL PRECISION VELOCITY VECTOR, I 
ITS OUTPUT LOCATION. 


, FOR EARTH CENTERED SYSTEM 
OR NOMINAL MOON CENTERED 
SYSTEM. 


POINT BACK TO NOMINAL SCALING. 
SCALE RTARG1 V AT i.'\ AND 
VT PRIME v , VIPRIME v ,DELVEET3y 




COLOSSUS 2D FC-26 





























































GENERAL INFORMATION 


PERFORM PRECISION INTEGRATION 


I PERFORM PRECISION INTEGRATION 




COMPUTATIONS COMPUTATIONS 


I MGLVFLAG LOCAL VERTICAL MIDDLE GIMBAL 

COORDINATES ANGLE COMPUTED 

COMPUTED 


UNIT NORMAL 
INPUT TO 
LAMBERT 


LAMBERT COM¬ 
PUTES ITS OWN 
| UNIT NORMAL 


MIDGIM (SH 12) MIDGIM (SH 11 


INITVEL (SH 5) INITVEL (SH 4) 


C**i*G* CCMMOI1 TAPGETIHG SUBPOUTIV.' 

_✓t-1 IH1TVEL, M»DG»M 

O pekiApo* selegtmu, prec 

col ossus 2D f C -264 

■ ■••■ty.ifei. ffii-a_a— 




ANOMALY LESS ANOMALY GREATER 


GUESSW (f.) NO STARTING ' STARTING VALUE INITVEL (SH 4) 

1 VALUE FOR FOR ITERATION 







CONSTANTS 


NAME 

PHYSICAL MEANING * 

SC AUNG 

COMPUTER VALUE 

HALFREV D 

0. 5 REVOLUTIONS 

2° 

1.0B-1 | 

EPSFOURjj 

15/360 REVOLUTIONS (EQUALS 15°) 

2° 

0.0416666666 

cD4rl | 

STANDARD RADIUS OF PAD 37-B 

,29 

6373338 B-29 


IN METERS, EQUALS 20,909,001.57 




FT 



MUTABLEp 

P E . IN M 3 /CSEC 2 

2 36 

3.986032 E10 ■>!* 

MUTABLE + 6D 

1/V5J IN csec/m 3/2 

2 -n 

0.50087529 E-S B17 

MUTABLE + 8D d 

H M , IN M 3 /CSEC 2 

2 30 

4.902778 E8 B-30 

MUTABLE + HDp 

1/V5^, incsec/m 3/2 

a' 14 

0.45162595 E-4 B14 



J COMMON TAR*LTIM* SI*MU?:: 

. 1 iNITVEL, MIDCIM 

n.wtifc p kwlAPo ^ sclectmw.prcc 

nAa<ti COLOSSUS 2D FC-2641 




P37-RETURN TO EARTH 


V2T100 Sh. 17 

GAMDV10 Sh. 23 

PREC100 Sh. 34 

RTEVN Sh. 28 

P37 Sh. 3 

Special Conventions: 

Because of the wide variety of situations which this program must 
handle, extensive use is made of floating point arithmetic. This 
involves normalization, with the shift count put into XI, X2, Si or S2. 
An operation which normalizes a quantity Z and puts shift count into 
XI is shown by norm xl (Z). 

All quantities are double precision unless indicated in this manner: 
Subscript S for single precision, subscript T for triple, subscript 
V for vector. 


MIT INSTRUMENTATION LAB 
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P37 

RETURN TO EARTH 

DRAWN M fan tiff A _ 

a-. 7-i? 



COLOSSUS 2D 

DOCUMENT NO. 
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COMPUTE LATITUDE AT THAT TIME 
COMPUTE ORBITAL PARAMETERS Fi 
STATE VECTOR 



FC-Z643 





















SYMBOL 


K4RTE d 

K 4 

INITIAL ESTIMATE OF 
COTANGENT OF REENTRY 
ANGLE USED WHEN 
|R(T1)/V|> K1 
(EQUIVALENT TO -5 58' 




MCOS7.5 d 

-COS 7. 5° 

USED IN DETERMINING 

GSOP QUANTITY K 

-.99144486 

-.99144486 

2 

MCOS22. 5 d 

-COS 22. 5° 

CRITERION USED TO 
DETERMINE WHETHER 
TARGET FOR LAMBERT 
STEERING IS TOO CLOSE 

92387953 

-.92387953 


mdothi d 

nUSPS, 

MASS DECREMENTATION 
FACTOR FOR SPS BURN 

63. 8 LB/SEC 

.289391932 
KG/CSEC 

2 3 

M DOTRCS d 

m(RCS) 

MASS DECREMENTATION 
FACTOR FOR RCS BURN 

. 16375 KG/SEC 

.0016375 

KG/CSEC 

2 

MSIN7.5 d 

-SIN 7. 5° 

USED IN DETERMINING 

GSOP QUANTITY K 

-. 13052619 

-.13052619 

2 


>//<¥ 

SQUARE ROOT OF EARTH 
GRAVITATIONAL 

19965050. 1 

199650.501 

m 3/2 /csec 


THETAl 65,-j 

-o 

165° = POSITION OF NEW 
TARGET FOR LAMBERT 
STEERING 

165° 

.458333333 

REVS 

2<> 

THETA210 d 

210° 

210° = POSITION OF 
ALTERNATE NEW TARGET 
FOR LAMBERT STEERING 

210 

.58333333 


VC RCS D 

V C (RCS> 

THRUST VELOCITY OF 

RCS JETS 

METERS/SEC 

METERS/CSEC 

• 

vcsps d 

V C (SPS' 

THRUST VELOCITY OF 

SPS ENGINE 

METERS/SEC 

METERS/CSEC 

2 

2RTEB1 d 

POSMAX 

INITIAL SETTING OF At 2l 

3777737777 

3777737777 

OCT 

2° 

30480RTE d 

30480 

INPUT TO TIMERAD = 
R(T2)/V - 30480 _ 

30480 METERS 

30480 METERS 


thp pm 1 OWING ARE INPUTS TO THE POLY SUBROUTINE. CALLED TO COMPUTE 

Z Iv,. e , IN THE ORDER THEY APPEAR. (ALL VALUES DP; 


I NO AQO TAGS - POLY USE 

S INDEXED ADDRESSING.) 





c o 

1 

1. 81000434 X 10 8 

M 181000434 M 

2 31 


c 


1.50785145 

1.50785145 




> COEFFICIENTS USED TO 
[ COMPUTE MA 2 

-6.49993057 x 10 

9 -6.49993057 

.,-27 


l 


9. 76938^926 x 10" 

8 '9. 76938926 ^ 










1 

" v 

P37 



■ ^^^^H^Il^icOLOSSUS 2D fQ- 

-2642 


o SZ 53 








PROGRAM CONSTANTS (CONTINUED) 
















































































CONSTANTS 


ENG IN EEKlIN vj 


RECIPROCAL SQRT O 


3.986032 x 10 1U 
.50087529 X 1< 


D UNITS SCALING 


M 3 /C$ECT 

CSEC/M 3 / 2 


MOON GRAVITATIONAL 
CONSTANT 

RECIPROCAL SQRT OF 




M J /CSEC 

CSEC/M 3/2 


PAD LOADS 


MEANING 


ENGINEERING 
VALUE AND UNITS 


:SM PREP. TIME 
POR MIDCOURSE 
MANEUVER 
PREPARATION 


_,M PREP. TIME 
FOR MIDCOURSE 
MANEUVER 
PREPARATION 




ORBITAL PARAMETERS DISPLAY 


Major Subroutines and External Entry Points: 


V82PERF: 

V82CALL: 

TICKTEST: 

SR30.1: 


Entry from Verb FAN 

Display and calling routine 

TFF countdown mechanism 

Subroutine for calculating TFF and TPER 


SH. 2 
SH. 3 
SH. 14 
SH. 15 


MIT INSTRUMENTATION LAI 
CAMBRIDGE, MASS. 

APOLLO GUIDANCE A NO NAVIGATION 

DRAWN -.\-Cwu.iTh 

PRGMR T Cnrf'.^ 


Orbital Parameters Display 

Colossus IIC 

DOCUMENT NO. 

FC-2650 


f /Aty*? 

APPR'D ^9yla / ? 

w 

REV 1 |SHEET 1 Of 25 | 



/ V82CALL \ 

Do orbital \ 

parameter ) V82CALL is 
display / NOVAC job 
'v Sh73 7 



APOUjO guidance and navigation 


I Orbital Parameters Display 


Colossus IIC 









Preceding Sheet 







V82GON ) AVEEAGEG running 



Ends extended verb 
which has called TESTXACT 


MIT INSTRUMENTATION LAI ] 

APOLLO GUIDANCE AND NAVIGATION 

DRAWN 


Orbital Parameters Display 

PRGMR ,1 ■ prof Ln 


l 

| DOCUMENT NO. 

ANALST 

.-j'), 4. n , 

—-- 

COLOSSUS IIC 

FC.- 2650 












From Preceding Sheet 


a astronaut choose this vehicle ? 
Yes_ 



OTHPREC = LEMPREC 
Input: permanent LM state vector 

_ _. TDEC1: j§ -’ 

' OTHPRECX integrate 


/integrate state\ Output: 


VATT y 
TAT— t 


velocity 
me of RATT, 



THISPREC = CSMPREC 
Input: permanent CSM 
state vector 
TDEC1 = time to 
integrate to 
'Output: RATTy: position 

vector @2 2 
VATTy: velocity 
vector @2 7 
TAT—: time of 
RATTy. 
VATT,, 


RONEy 4 
VONEy - 

tff/rtmu d - 
hpermin d - 

l A/77— 

RATTy 

VATTy 

1/RTMUE D £X2 
MINPERE d #X2 

Next 

Sheet 


Output of conic routines put into R30 
locations: 

l/RTMUE - . 50087529 X 10~ m. @2' 17 
1/RTMUM = .45162595 Xio" 4 m . @2' 14 

MINPERM \ 10668m. @2 27 1 . . 

9Q \ minimum 

MINPERE = 91440m. @2 ^ ( altitude 
X2 index register contains zero if space¬ 
craft is in earth's sphere of influence. 

2 for moon's sphere, so that proper 
value will be picked up. 


MIT INSTRUMENTATION LAI 
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Orbital Parameters Display 

PAGMR T 

/H? 

DOCUMENT NO. 

colossus nc FC _ 2650 




m 

IEV 1 |SHETT 7 Of 25 





Preceding Sheet 







VONE v = present velocity vector 

V82EMFLG: Flag on * moon's S[ 
Flag off * earth's s 
RPADTEM n = radius of pad: me 


/ SR30.1 \ 

/ Calculate \ 
HAPOX_. HPERX-N 


Output: HAPOX d = apogee altitude a 
radius: meters ' 
HPERXq = perigee altitude i 


TSTART82 n - TIME2 n - TSTART82 n Time elapsed since TSTART82 


21 Orbital Parameters Display 


From Preceding Sheet 


-TPEE is set to zero when 



APOLLO GUIDANCE AND NAVIGATION 




I SHEET 10 0f~ 




V82GON scheduled this FINDVAC job of 
priority 07 



MIT INSTRUMENTATION LAI 

APOLLO GUIDANCE AND NAVIGATION 

CAMBRIDGE, MASS, 

orbital Parameters Display 




DRAWN 

PRGMR 


COLOSSUS IIC 


document no. 

FC-2650 






Preceding Sheet 



MIT INSTRUMENTATION LAI 
CAMBRIDGE. MASS. 

- ur 


APOUO GUIDANCE ANO NAVIGATION 


Orbital Parameters Display 






From Preceding Sheet 


/INTSTALIA 
/ Stall this \ 
/ program until 
\ integration 
\ is free / 

\ FC-2g9 0 .7 


DELRSPL 

InPU MPAC D = TFF d 

tff/rtmu d , rmagi d , 

) NRMAG d , TFFVSQ d , 
TFFNPD d , RTERM d , 
NRTERM d , TFFX d , 
TFFTEM d , LAT(SPL) d , 
LNG(SPL) d 
O utput: 

SPLERROR D = range angle i 


Chec k for terminate 
I instruction, c 
DELAYJOB 


MIT INSTRUMENTATION LAI 
CAMBRIDGE, MASS. 

DRAWN '■T.C.O^TTq_ 


PRGMR 1 ■ (su 

ANAIST 



VGWVJI 


Orbital Parameters Display 






APOLLO GUIDANCE ANO NAVIGATION I 

Orbital Parameters Display 

-r 


COLOSSUS IIC 












Next Sheet 


TFFCONMU: 

Input: 

RONE.. = position vector in meters E( 
2 29 M@2 27 

VONEy = velocity vector in m/csec E 
2 7 M@2jL 7 . , 

TFF/RTMU = 1 E@2 M@2 


meters E@2 , M@2 

= normalized RMAG, nrom count 
■ vi = ^,29-NR 


NR = -XI = -norm count for NRMAG 
TFFNP n : semilatus rectum, weighed by 
mb. tt®,38-2NR 


TFFVSQj-j: ^Tu — *17? present velocity, 
normalized 1/meters E@2 20 
M@2~ 18 

TFFALFA n : aweighted by NR, in l/meters 
E@2~ 26 + NR M@2' 24 + NR 
,,-10-NA 


X2 = -NA, norm count for n/<* 

TFFl/ALF— = signed, semi-major axis 

weighted by NA. In meters 
E@2* 22 + 2NA M@2 20 + 2NA M 
VONE' = VONE-TFF/RTMU in l/(M 1/2) 


TFFRP/RA: 

TFFALFA n = a = (: 


>-l • 


-major axis) ‘ 

, -i ^„-26 + NR,„-24 + NR 
meters @2 / 2 

semi-latus rectum in meters 
@2 38 - 2NR /2 36 - 2NR X1> X2 
set by TFFCONMU 


Output: 29 27 

RPER~ = perigee radius in meters @2 /2 

D r ° 29/27 

RAPOp = apogee radius in meters @2 12 


MIT INSTRUMENTATION IAI 
CAMBRIDGE, MASS. 
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DRAWN 

pi a. 

Orbital Parameter Display 

DOCUMENT NO. 

COLOSSUS IIC FC- 2650 



APPR'D 

yxlQ, 

REV~i [SHEET , R Of 25 



From Preceding Sheet 



MIT INSTRUMENTATION LAI 
CAMIRIDGE. MASS. 



viaw-V. V.. K. fYYl y. 


APOLLO GUIDANCE ANO NAVIGATION 


Orbital Parameters Display 


COLOSSUS IIC 


FC-2650 












From Preceding Sheet 



XI = Norm factor for RivIAG 
TFFNP^ = semilatus rectum meters 
@2 38 " 2X /2 36 ’ 2X 

TFFALFA 1 q meters @2' 26 + Xl /2 -24 + X1 
TFFRTALF = ^meters 112 @2 10 ' X2 /2 9 ‘ X2 
X2 = Norm count for TFFRTALF 
TFF1/ALF = signed, semimajor axis, meters 
@ 2 22 - 2x2 /2 20 - 2x2 

Output: 

MPAC d = time to perigee in csec @2 28 


MIT INSTRUMENTATION 
CAMBRIDGE, MASS. 

■ 

APOLLO GUIDANCE ANO NAVIGATION 

DRAWN - 

PRGMR /■ 

ANALST 


DOCUMENT NO. 

COLOSSUS IIC FC-2650 

nrr,Mtr^^L xirJYV \ 

Kh<ilt. 9 


m 

REV - ! |SHEET 19 0f25 


From Preceding sheet 



RPADTEM + HPERMIN, TFF/ RTMUp, 
NRMAGj-j, XI, TFFNP d> TFFALFA d , 
TFFRTALF n , X2, TFFl/ALF 


If the trajectory fails to reach HPERMIN+ 
RPADTEM (300, 000'or 35, 000 1 ) then TFF 
will be displayed as 59B59 
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BRAWN Ci.r.^nWa _Orbital Parameters Display 

PRGMR XXmf?,* — I DOCUMENT NO 
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ERASABLE LOCATIONS USED (CONTINUED) 








ERASABLE LOCATIONS USED (CONTINUED) 






2 




















































































' Oi'.rtN SlMA* 

j ANJUM - 

I S-jfe^ 7 


TARGET DELTA V 
COLOSSUf 2D FC-2670 
























































































THRUST PROGRAMS (P40 . 


COLOSSUS 2C fl< 


^ST^ATI* LAB 

APOLLO GUIDANCE AND NAVIGATION 



THRUS FROG K/VMS 

amaTu <2ra ^ > - 


COLOSSUS 21) | uWu" 0 ' 

Um'0-^a^^ c.^., 































































































































































































PRECEDING SHEET 






















































































































































































































































































































































































































































































































































































































































































































































































































































































































































FROM PRECEDING SHEET 





INPUT: MPAC V = POSITION VECTOR 

OUTPUT: MPAC y - GDTl/e y = V e THE DIFFERENCE IN VELOCITY DUE TO 

AT SPECIFIED POSITION, OVER Z SECONDS 
IN REFERENCE COORDINATES IN M/C5EC ® t! 



VlPRIME v * V R (T i& ) = REQUIRED VELOC 


IN M/CSEC Z 1 
SOOCSj, = ZOO CSEC <§> Z 1Z 
C STEER = STEER-LAW CONSTANT @> Z' 
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FROM PRECEDING SHEET 



















































































































































































































































































































NAME 

MEANING WHEN SET 

MEANING WHEN CLEAR 

WHERE 

c^SISSd 

TESTED 

UWNNEL 


|§SF 


SH. 23 

SH. 27 



SSSMSSSd 

=y=° 

SH. 44 

IS: L 8 - 


3T 

OPTICS CIJU ERROR 

5o 1 s^g™baes ECTED 

from T s ER s S g“mbals ECTE 

SH. 44 

SH. 28 


ST 

ana^convertbr 

toStorter^ngaged 00 

SH. 44 

SH. 28 


m?r EL 

SomS^deT 

COMMANDED 1 " N ° T 

SH. 27 



CHANNEL 

Sis™ 

TVCKTClflNraBITED 

IS: i!* 

ill 


BIT 12 

CHANNEL 

KfSSSoM 

TVCYAW 

+X-TRANSLATION IS 

? u v£I«b!S 

+X-TRANSLATION IS 

IS: tl 

ir 


31 

S?STe°r N “ U 

COMMANDED BY 

3*55^“” 










































TOWS SCALING 


filter'output 1 tracker 


' 

=ss 1 
^^ssssf-fsssr^p 1 

^ T , IT -7r E o E m R ^^ C a°p NTROL 1 



wss^ 


l m l u d Tp mbalangle 
S— ‘S F to N be 











POINT VCSM 


ERASABLE LOCATIONS U! 


ALIGNED (IN THIS CASE, I] 
THE DIRECTION OF INITIA 
THRUST), IN STABLE 
MEMBER COORDINATES 


[REFSMMAT] TRANSFORMATION MATRIX 
FOR CONVERSION BETWEEN 
REFERENCE AND STABLE 
MEMBER COORDINATE 

POSITION VECTOR AT A 


COORDINATES 


ENGINEERING 


COORDINATES 
TEMPORARY STORAGE F< 


TEMPORARY STORAGE F< 


RESPECTIVELY 


F RELEVANT 
WNLINK 

TIME UNTIL ENGINE CUTOFF 




THETADY 










ES sS MEANING . "'SH"" U A N TxS B&&NO 

ffiTADZ S g=°a T N °gL MIDDLEIMU DEGREES REVS 



EIS£s' BE ' GAraED 

S=- rOCITY - 


VGPREVv - v ° 

VGTIGv Zg<Tig> 1BHSS 
V!NITv SSI 



























































































































































































































































































































































































































































































































































































































































































SERVICER 


MAJOR 

UBROUTINES AND EXTERNAL ENTRY POINTS 


PREREAD: 

Initializes SERVICER 

Sh. 2 

PREREAD1: 

Zero pipa's 

Sh. 3 

NORMLIZE: 

Does Initial State Vector Update 

Sh. 4 

READACCS: 

Reads Accelerometers, Sets up SERVICER; 
Reschedules Itself Every 2 Seconds Until Stopped 

Sh. 5 

PIPASR: 

Reads. PIPA Counters 

Sh. '9 

REREADAC: 

Possible Restart Entry to READACCS - In Case 
Accelerometers Must Be Reread 

Sh. 13 

QUIKREAD: 

Takes Quick Accelerometer Readings for 

Downlink Telemetry 

Sh. 15 

SERVICER: 

Checks A Velocity Values Read In, Does 

Permanent State Vector Update Using Sensed 

A Velocity 

Sh. 16 

CALCRVG: 

Computes New State Vector 

Sh. 20 

CALCGRAV: 

Calculates Gravitational Acceleration at 

Specified Position 

Sh. 22 

AVGEND: 

Final Exit from SERVICER: Performs Transition 



.to . Coasting Flight Routines 

Sh. 25 

SERVEXIT: 

Common End of SERVICER Routines 

Sh. 27 
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Initialization of SERVICER 

Entered from P40, P41 / S61. 1 (P61, P621,, P47 

Entry (Powered Right 

flight 


monitor) 


Does last gyro compensation in free-fall (drift) mode; 
beginning PIPA-reading mode 
(Sets 1/PIPADT= A time between PIPA r 


__ __ _ __ readings) 

1(2 sec) used by 1/PIPA see Sh. 13 / 
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( pRE HE AD l) Also called by Pll (Earth Orbit Insertion Monitor) 



Initializes PIPA's for later readings 


PIPAGE 1 Indicate PIPA reading finished 


AVEGFLAG Continue running SERVICER 

Clear Don't do free fall jjyro compensation 

DRIFTFLG (Not in drift portion of flight) 
S £Wa r. SERVICER is running 


\ Return via ~7 

VtUPTREGl/ 
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(normlize) 




/ GEh 

1TRAN\ 


Store 
words 
from one location 
into another 


Do initial state-vector update 

set up by PREREAD with priority 32; 
also called by PI 1 

Set parameter for GENTRAN 

l=number of words to be moved 


Result: RN y 4 RNl y 

VN y 4 -VNl y 

PIPTIME d <- PIPTIME 1 D 

(Update powered flight permanent state vector) 


Allow 

Inter- 


GENTRAN inhibits interrupts 


| MPACy —— RN y | Set up input to CALCGRA V 


/calcgraA 

/ Calculate \ 
/gravitational ' 
\ acceleration / 


\ Sh. 

22 / 



GDT/2 y 4 —GDT1 / 2 y 
GOBL/2 y 4 — GOBLl/2 y 


Input: MPACPosition vector in reference coordinates 
in M $2 £W 

RTX2 Indicates whether in earth or moon 

sphere of influence, by value of 0 or 2 
respectively 

PAC V = GDTl/2 y = One-half the velocity change 
due to gravitational 
acceleration at the specified 
position over a two-second 
interval, in reference 
coordinates in m/csec 
9 27 

in earth's sphere of influence: 

GOBLl/2 „= correction term for 

gravitational anomaly due 
to earth oblateness a 
2 1 

itore new values from CALCGRAV 


\endofjoi/ 
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\ R-ead accelerometers; Set up SERVICER. 

I Set up as task every 2 seconds 
until stopped. 

. Initiated by PREREAD (Sh. 4) or by Pll (FC-2540) 


9 7 


Output; DELVX, DELVY, DELVZ; 

3 components of the A velocity 
since the last reading 
in SM coordinates, . . 

in m/csec ® . 000585 x 2 14 
(nominally) 
(zeroes low-order words) 


[ GROUP 5, 5 

/ Set up restarts " 

! to schedule / 

RED05. 5 as / 

a WAITLIST task/ 
immediately / 


(rED05. 5^) 

r T^ , 

| PIPAGE 4—1 | i nt ji ca te PIPA reading finished 













































From Preceding Sheet 



































From Preceding Sheet 
( NOSAVPIP) 




| CM/GYMDT4—5 | 



\ SETJTAG / 


Initiates entry EOLLDAP 


Set up restarts to 
schedule SETJTAG a 
a WAITLIST task in 
_ 1.2 seconds 

TBASE1-*-TIME1 


' Set up restarts to i 

schedule CHEKA VEG / 
as a WAITLIST task 
immediately / 


I 

Next Sheet 
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From Preceding Sheet 

Also entered directly from Sh. 5 if ii 
Zy maneuver rather than entry 


JHEKAVEGj 



\WAITLIST. 

\ task / Re P eat thls 
y < routine every 

A -hA 2 seconds 


(makesera^*- 

SERVICER 

FINDVAC ; 

with 
priority 20 
Sh. 16 

n 


Updates state vector 


( Set up restarts to 
schedule SERVICES, 
as a FINDVAC job 
with priority 20 and 
RE RE AD AC as a WAITLIST 
task in 2 seconds 

TBASE5— -TIME1 


Note: A. times for future Group 5 WAITLIST 
task restarts are measured from 
the time this instruction is executed 


Set hit 9 
of 

channel 11; 


Indicate SERVICER active 
(For hybrid simulator) 


TASKOVER / 


MIT INSTRUMENTATION LAS 

APOLLO GUIDANCE AND NAVIGATION 

' 


SERVICER 

DRAWN / /, 




ANALST ALS~t*L - 

DOCMR 
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DOCUMENT NO. 
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I PIPTIME1 D ~—'TIME2 d | Save time of PIPA readings in csec @ 2 2 * 


TEMX- 

TEMY-*- 

TEMZ- 


DELVX +1 <— +0 Zero low-order A velocity registers 
DELVY +1 <— +0 to indicate compensation of values has not yet 

DELVZ +1 <— +0 been done 

(for Downlink telemetry) 


| PIPAGE— +0 | indicate PIPA reading jj 
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From Preceding Sheet 


I TEMX —- -PIPAX 1 

| TEMY ——PIPAY | 


Temporary storage 
of X and Y PIPA 
readings 


I DELVX-*- PIPAX I Final storage 
[ DEL VY~*— PIPAY [ of X and Y PIPA 
readings 


Set DELV f=(DELVX 
DELVY n , 'faELVZ r .i 
=AV U D J 


D' 


=Change in velocity 
since last reading 
in stable member coordinat 
in m/csec ® . 000585 x 2 14 
(Nominally) 


PIPAX=X-component of 


XV 


f PIPAX -— -0 I Clear X and Y 

[ PIPAY 0 | PIPA counters 


PIPAY =Y-component of 
Ay 



Where t=2 


PIPAZ=Z-component of Ay 



Where t=2 

All in SM coordinates 

iiji^m/csec ® . 000585 x 

(Nominally) 


Note: Scaling of AV increments, 
as measured by PIPA's, is 
inaccurate due to bias and 
scale factor errors in the 
hardware. These errors 
are compensated for (making 
scale factor accurate and 
removing bias) in l/PIPA 

---S. (See Sh. 17) 

f RE PIP 3 J 

JT 

Next Sheet 





























From Preceding Sheet 
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—Do PXPA reading if necessary 
REREADACT Possible res tart entry to RE AD ACCS 

—* (Appropriate if restart occurred between 
. end of one READACCS cycle and an early 
point (PIPSDONE) in next cycle) or between 
end of PREREAD and first READ ACCS cycle. 


-] Set 1/PIPADT= A time between PIPA 
_1 readings @2 in case LASTBIAS wioed out 
during restart between PREREAD and first 
READACCS cycle. 

\ Was PIPA reading in progress when restart occurred? 
, = \ No: start READACCS at the beginning 


Yes: 

Z -component 
reading 
not finished 


Yes: 

Y -component. 

reading 
not finished 
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Store past and present PIPA readings ( 3 times) 


' x Store past and present P 

“►fouiKREADj for xDownlink telemetry 

' May be scheduled by READACCS when r 
during entry 

PIPCTR preset to 2 by READACCS 


XOLDBUF -—XPIPBUF 

YOLDBUF --YPIPBUF 

ZOLDBUF —— ZPIPBUF 
XPIPBUF -— PIPAX 
YPIPBUF -—PIPAY 
ZPIPBUF -_PIPAZ 


Old PIPA readings 
New PIPA readings 



’IPCTR=0 T- y Yes: Last pass 


Vtaskover/ 


| PIPCTR--*—PIPCTR -lj Decrement loop counter 


yfrlXDELAY' 

Wait 
0. 5 second 
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From Preceding Sheet 


| PVTOTAL.^*—DVTOTALjj + KPIP1 x [PEEVyl] 

velocity changes since 


beginning of the maneuve 
in m/csec @2 
Where KPIP1= . 000585 x 2 

scaling factor 
for DELV,, 


I Set up restarts to 

schedule REREADAC. 
s a WAITLIST task 
n 2 seconds _ 

_ Group 5 - 

Set up restarts 
to schedule next 
location as a FIND VAC/ 
job with priority 2 0 


Input: DELV„ = 2-second velocity change in SM .. 

v coordinates in m/csec ®. 000585 x 2 
RN„ = Old position vector in reference 
v coordinates in m@2 29 
VN.. I Old velocity vector in reference coordinates 
i- n m/csec ® 2 


GDT/2 V = 1/2 the change in velocity due to 

gravitational acceleration at RN„ over 
an interval of 2-secs, 
in reference coordinates, in m/csec 
@ 2 7 

RTX2- Indicates whether in earth or moon sphere 
of influence, by value of 0 or 2, 
respectively 



Output:DEL VREF „= Sensed velocity change in 

reference coordinates in m/csec 
@2 T 

RN1„ “Updated position vector in reference 
v coordinates inm ®2 29 
VNly “Updated velocity vector in reference 
rrvri /9 coordinates in m/csec ®2 7 
u ' V =1/2 the change in velocity due to 

gravitational acceleration at RNly over 
an interval of 2 secs in reference 
coordinates, in m/csec @2' 

And if in earth's sphere of influence: 

GOBLl/2„ = Gravitational anomaly due to earth 
oblateness ®2* 


Next Sheet 
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From Preceding Sheet 


| Set up restarts to 

schedule EE REA DA C 
as a WAITLIST task 
Lil2 seconds 

Group 5_ 

Set up restarts ti 

schedule next locatior^ 
a FINDVAC job 
with priority 20 



Input: RN1 = First word to be stored 

KN = First word to be'stored into 
Result: RNy'f— RNly 
VN V <— VN1 V 
PIPTIME d <— PIPTIME 1 D 

GDT/2 - GDT1/2 V 

GOBL/2 v <- 'GOBLl/2 v 

(Update powered flight permanent state vector/ 
V -in reference coordinates ' 


GENTRAN inhibits interrupts 


Set up restarts to 

schedule next location/ 
a FINDVAC job 
with priority 2 0 


AVGEXIT d Set by program using SERVICER: 
STEERING (FC 2682) Set by P40 (SPS Thrust) 

CALCN85 (FC26F2) Set by P40, P41 (Thrust) 

CM/POSE (FC 2775) Set by P62 (Entry) 

CALCN83 (FC 2700) Set by P47 (Thrust Monitor) 

VHHDOT (FC 2540) Set by Pll (Earth Orbit) 

Insertion Monitor) 

Set by READACCS in final pass 
Common end of this routine 
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^CALCRVG^ Update state vector 


EyREF^^SM.C^FSMMATj_ 

jDELVREF v —KPIP1 x DELV v x REFSMMAT a 


PLOy ^—1/2 DELVREFy. | 


Convert AV sensed into 
reference coordinates in 
m/csec @ 2 7 

Where: DEL Vy=AV in SM 
coordinates m V m/csec ® 

. 000585 x 2 1? 

"KPIP1-. 000585 x 2 7 (for scaling 
DEL Vy) B 

REFSMMAT m = Transformation 
for conversion 
between SM 
reference coords 
@2l 

3 ?iite| tor is for - 

in m/csec 0 2 7 
reterence coords 




Save intermediate results: 
1/2 AV (in reference coords, 


r---. in reterence c 

1 PL6 y--GDT/2y-fDELVREFy | j/ 2 Q (T)AT ^ 1/2AV in m/csec^ 2 7 


Where: RN V = Old position vector 

in reference coordinates 
in m@ 2“ 

VNy 11 Ola velocity vector in 

- reference coordinates 

| (T+AT)=_5 n?M_AT_V m +G (T) AT/2 +AV/2 I 


MPACy—RNy +2SEC ( 22 ) d E^V +GDT / 2 v +zDELVREFJ 


velocity change 
due to gravitations 
acceleration a 


RN„ 


a 2- 


;cXnd interval 
in reference 
coordinates in 
m/csec a 2 7 
=200 csec a2 22 


- MPACy j Save new position vector 








































From Preceding Sheet 


Calculate \ 

gravitational 
acceleration / 


Input: MPAC = Position vector in reference 
V coordinates in m (8 2^ y 
RTX2- Indicates whether in earth or moon 
sphere of influence, by value of 
0 or 2, respectively 

Output:MPAC v = GDTl/2 = 1/2 the change in velocity 
v due to gravitational acceleration 
at the specified position over a 2- 
second interval in reference 
coordinates in m/csec 82? 

And if in earth's sphere of influence: 

GOBLl/2 = Gravitational anomaly 
due to earth 
oblateness 8 2 1 


IQ (T+AT)+Q(T)) 

V (T+AT)= V(T)C % /AT+AV 


VN1 V .-^VN V +MPAC V .+PL6 V . + PLO y 


Compute new velocity vector in reference 
coords, in m/csec 82 1 
Where: VN„=0Id velocity vector in 

reference coordinates in 
m/csec 82 7 


PL6 v'} 

plo 7 


Intermediate 


results saved 


7 
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__ Calculate gravitational acceleration 

(^CALCGRAV^) at P osition g iven in MPAG.,7 / in reference 




-R = UNIT (R) 
UNITRy.^— UNIT(MPAC V ) 
PLX y UNIT(MPAC V ) 



r 2 = a • a 


v / in reference \ 

[coordinates in m 


Note: PLX refers to location in pushlist 
to which pointer (PUSHLOC) refers 
when this routine is called 


-MPAC ■ MPAC „ 


R is saved (in n 


Save RTX2 = Indicator of earth or moon 
sphere of influence 
by value of 0 or 2 respectively 
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From Preceding Sheet 


In earth's sphere of influence ? 


- X X1 

° ? \ __ 

S Yes: m 

ust make correction for earth oblateness 

cos 0 = II R • U z 

PLXg'N-PLX y • UNITW v 

Compute cos 0 at 2* 

Where: 0 = angle between position vector and 
earth polar axis 

UNITW V = U z - Unit vector in direction of 
Z=Earth rotation vector 
(Polar axis) 

in reference coordinates 
@ 20 

_3 

r 

>-e6 B 1 3 ^ J 2E (R e /R) 2 [U-'5_cos2 0 2 

GOBL^/ 2 V*~20(DPI/20-PLX 2 ) UNITRy+ 2J Q ^^D PLX D UNITW y 


Compute gravitational anomaly due to earth oblateness 
@ 2 1 (Reference coords) 

Where: 20J D = 20X 3/2 J 2E @ 2 1 

Where J 2E = . 10823067 XiO' 2 

= 2nd harmonic of earth's potential function 

2J d =2 X 3/2 J 2E @ 2' 1 

RESQ_= R?, = Square of equatorial ,radiuA.of the earth= 

D ^ 40. 6809913 x lO^m @ 2™ 

DP1/20 d = .05 = 1/20 

1 PLX^*—UNITRy-/-GOBLl/2„ 1 When in earth sphere of influence, 

J 

by adding in Gg ( @ 2 1 ) 

■ ] 


Next Sheet 
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From Preceding Sheet 
(iTISMOQN) 


-2: Moon 



0 : Earth 


_1/2QATAI2(-^ lij^AT- _ 
MPA ST #i^ ( f ) p X PLX V X 2 - 21 ' 


1/20AT- 1^2(=|§_y a * AT 

x plx v ~x I’= 


Compute 1/2 G AT - 

= 1/2 the A velocity due to gravitational acceleration 
(at specified position) over 2 seconds 
Webreference coordinates in m/cs'ec @ 2 7 
- MUDT(M)j^^ AT 
= - 4902778X 10 9 _m 3 \j x (200csec)p244 


-MUDT(E) d =- > ( e L 
= - 398603225X10 1 


m 2 J X (200csec)ff 2 4 ‘ 
csec / v ' 

factor is for scaling 


j GDTl/2 y * MPACy j store new value for !/ 2 q a t 


Return 

\via QPREt/ 




































Entered from SERVICER last time through: final exit 


Set OLDBTl= (l/PIPADT) =Time 'of last PIPA 
compensation 


foLDBTl - 


to low-order half of PIPTIME^ 
PIPA reading^ 
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(sERVEXFl) Common end of SERVICER routines 


Set up restarts to 7 

schedule RE RE ADA C / 
as a WAITLIST task 
in 2 seconds / 


\en: 





























II 
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)isplay _ Description of Each Regis 

ALARM _ Alarm light on; Rl, R2, 


oc 

os 

eg 

1 1 ?„ -r, 

OiS 

|| | iii || 

I Engineering 1 

| Units | 

degrees 

degrees 

degrees 

degrees 

degrees 

! Meaning 

Snapshot of inner IMU gimbal 
angle (2's complement) 

Value of AIG (above) at time of 
last PIPA reading 
(used by entry DAP) 

Value of ALFA/180 (below) at 
time of last PIPA reading 
(used by entry DAP) 

Third Euler angle for CM 
attitude 

Snapshot of middle IMU gimbal 
angle (2's complement) 

Value of AMG (above) at 
time of last PIPA reading 
(used by entry DAP) 

Snapshot of outer IMU gimbal 
angle (2's complement) 

Value of AOG (above) at time 
of last PIPA reading 
(used by entry DAP) 

I GSOP 

| Symbol 



AIG 

AIG/PIP 

ALFA/PIP 

ALFA/180 

AMG 

AMG/PIP 

AOG 

AOG/PIP 


MIT INSTRUMENTATION LAI 
CAMIRIDCE, MASS. 

APOLLO GUIDANCE ANO NAVIGATION 

SEKVHJEK 

DRAWN / Lhj^Ju 


ANALST ;4£ £^tJL 

DOCMR " 


COLOSSUS 2D 



jiiitia 

REV 1 ISHEET30 Of 37 




























AGC 

Scaling 

l£>^ 

! AGC 

Units 

m/csec 

m/csec 

m/csec 

m/csec 

Engineering 

Units 

degrees 

degrees 

m/sec 

m/sec 

Meaning 

2CADR of location which begins 
routine to run after SERVICER 

Value of BETA/180 (below) at 
time of last PIPA reading 
(used by entry DAP) 

Second Euler angle for CM 
attitude 

Sensed velocity change in 
reference coordinates 

Sensed velocity change in 
stable member coordinates 
X-component of sensed velocity 
change in SM coordinates 

Y-component of sensed velocity 
change in SM coordinates 

Z-component of sensed velocity 
change in SM coordinates 

GSOP ! 

Symbol j 

* J* J* 
;>'>!>> > 

< < < < <i 

oS> 

Q p, o (li 

H g " H Q Q Q 

M > X £ X ■ 

<>>>>> 

% a SBSqqq| 






























8J 


si 

m/csec 

m/csec 

fr 

m/sec 

m/sec 

m/sec 

i 

1/2 The change in velocity due 
to gravitational acceleration 

ve^ion o7gDT/2^ Ubovl)^^ 

Correction term (in reference 
coordinates) for gravitational 

at R) E UNIT (R) + G„ 

nr~ 

Temporary storage for updated 
version of GOBL/2 y (above) 

Rival id* if Negative g ’ 

A Time between PIPA readings 
or time of last PIPA compensation 

sfr&iu&r* 

GSOP 

Symbol 

1 1 J | 

5 y\S 

J AGC 

1 Tag 

< > > ct 

h P" Pm m^q^< 

>Q qo ° S ? 

QO oo o 2 O i. o. 



A POLIO GUIDANCE AND NAVIGATION 


| SHEET J 

















































MIT INSTRUMENTATION LAI 
CAMIRIDGE, MASS. 

APOUJO GUIDANCE ANO NAVIGATION 

BRAWN / 


SERVICER 

ANALST AS. 

BOCMR ' 


COLOSSUS 2D 

APPR'D^A^!*.^ 

>Uuk2 

REV~i ISWT34 Of 37 























if - 


11 

II i i i i i i 
66 666666 

“*5r- 

m/sec 

m/sec 

m/sec 

m/sec 

m/sec 

m/sec 

m/sec 

m/sec 

li! 

I 

Velocity vector in reference 

Old PIPAX (see above) reading for 

New PIPAX (see above) reading for 

Old PIP AY (see above) reading for 

New PIPAY (see above) reading for 

Old PIPAZ (see above) reading for 

New PIPAZ (see above) reading for 

fs • 

P 

E i 
>1 >1 

«f 
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FROM PRECEDING SHEET 


SET PARAMETER FOR GENTRAN 
A+l= NUMBER OF WORDS TO BE MOVED 















































































SS 

DESCRIPTION 

c = 


C OUT RIG 

2270 

UPDATES TRIGONOMETRIC FUNCTIONS OF IMU GIMBAL 

SH.8 


GENTRAN 

2070 

INT^T ST” ° F W ° RDS PROM ° NE LOCATI ° N 

SH.7 


MIDTOAV2 

2290 

WDA 1 TE STATE VECTOR TO A LITTLE PAST PRESENT 

SH.3 


PREREAD 

2683 

DURING flSlNEOTER™ 011 MAINTAINS STATE ^CTOR 

SH.4 


PRIOCHNG 

2060 

CHANGES PRIORITY OF THE CURRENT JOB 

SH.5 


R02BOTH 

2210 

SSfD C TERMNATES SrMIPNOT) ORIENTATION 

SH.3 


SERVEXIT 

2683 

COMMON END OF SERVICER ROUTINES 

SH.7 


Sll.l 

2540 

SZSSK SaT and 

SH.6 


*SMNB* 

2270 

§graSfiBSPLS5FS§g^rS“ —™ 

SH.8 



VERB- 

NOUN 

TYPE OF 

DISPLAY 

DESCRIPTION OF EACH REGISTER 

WHERE 

EXECUTED 


FLASHING 

MONITOR 

R1 XXXX.X FT/SEC) 3 COMPONENTS OF 

R2: XXXX.X FT/SECJ DELVIMU 

R3: XXXX.X FT/SEC) . TO ?ALAV 

beginnincTof 

MANEUVER (OR 

LAST INITIALIZATION) 
IN CONTROL 
COORDINATES 


ERASABLE LOCATIONS USED 


s G y S m°b P ol 

MEANING 

ENGINEERING 

i^Ss 


ALTI d 

AVEGEXIT d 

COSCDUX 

COSCDUY 

COSCDUZ 


8£g OF INNER IMU GIMBAL 

COSINE OF MIDDLE IMU GIMBAL 



* 


IW»U*KTAII0l. LAS 

itf 0L0SSUS nc i FC-2700 

e - 1 S * [T 9 Of 10 ' 


L. 
















































ir 




g?p C =T AUN c„ 







M/CSEC 

M/CSEC 


PROGRAM CONSTANTS 


TRANSFORMATION MATRIX FOR 
CONVERSION BETWEEN NAVIGATION 
BASE AND CONTROL COORDINATE 
SYSTEMS 

(A 7.25 DEGREE ROTATION) 


. 12620 .99200 













































































































































































































































































































































































































































































































































































































































ziu^L 



















































































































































































































































































































































































































C mwmove) INPUT : ADDRESS of matrix to be moved 

'-- J IN INDEX REG. WO^l 

ADDRESS WHERE MATRIX IS TO BE MOVED 
IN INDEX REG. NO*E 

NOTE: ADDRESSES ARE COMPLEMENTED FOR 

THE SUBTRACTIVE INDEXING LOGIC OF THE 
INTERPRETER 


RETURN 7 

VIA QPRET/ 





i«- AJ -XJ*, 

i n 


colossus nc 







































































FLAGS (CONTINUED) 


MEANING WHEN SET 


LUNAFLG 

ERADFLAG 

CULTFLAG 

TARG2FLG 

TARG1FLG 

REEFLG 

PFRATFLG 

DRIFTFLG 


LUNAR LAT-LONG 

EARTH - COMPUTE 
FISCHER ELLIPSOID 
MOON - USE FIXED 
RADIUS 

in E fie^d^of T view TARS 

STAR OCCULTED 
SIGHTING LANDMARK 
SIGHTING LEM 
SIGHTINGS ARE VALID 

PREFERRED ATTITUDE 


EARTH LAT-laONG 

EARTH + USE 3TIXED- 
RADIUS 

MOON - USE RCS FOR 
LUNAR RADIUS 

TATARS IN FIELD OP 

STAR NOT OCCULTED 
SIGHTING STAR 
NOT SIGHTING LEM 


DISPLAYS 


DESCRIPTION OF EACH REGISTER 


V05N09 

V06N89 


V01N70 

V50N25 


PERFORM 

FLASHING 


FLASHING 


FLASHING 


: OPTION CODE FOR ASSUMED IN 


T AVAILABLE 


: PLEASE PERFORM F] 


MIDDLE GIMBAL ANGLE - 




colossus nc 


FC“2720 

































ERASABLE LOCATIONS 




TA§ 

SYMBOL 

MEANING 

ENGINEERING 

: ’iSgts 

SCALING 


OPTION2 


ORIENTATION CODE 





TIME2 


PRESENT TIME 





TSIGHT 


TIME OF SIGHTING 

CENTISECONDS 


B-28 


ALPHAVy 

R 

RADIUS VECTOR 



1/2 UNIT 
VECTOR 


XSMD 


STABLE MEMBER DESIRED 
COORDINATES X-ROW 



1/2 UNIT 
VECTOR 


YSMD- 


STABLE MEMBER DESIRED 
COORDINATES Y-ROW 



1/2 UNIT 
VECTOR 


ZSMD 


STABLE MEMBER DESIRED 
COORDINATES Z-ROW 



1/2 UNIT 
VECTOR 


VATT 


CONIC VELOCITY VECTOR 





RATT 


CONIC POSITION VECTOR 





TDEC1 


PRESENT TIME 





VEARTH 

“E 

UNIT VECTOR SPECIFYING 

LINE OF SIGHT TO EARTH 



VECTOR 


VSUN 

“s 

UNIT VECTOR SPECIFYING 



1/2 UNIT 
VECTOR 


VMOON 

"M 

UNIT VECTOR SPECIFYING 



1/2 UNIT 
VECTOR 


VEL/C 


ABERRATION CORRECTION 





CEARTH 







CMOON 









STAR NUMBER TIMES 6 

INTEGER 

REVS 

1 


BESTJ 


STAR NUMBER TIMES 6 

INTEGER 

REVS 

1 


XNB V 

*NB 

PRESENT NAV BASE X 
COORDINATE 



1/2 UNIT 
VECTOR 


YNB 

Xnb 

PRESENT NAV BASE Y 
COORDINATE 



1/2 UNIT 
VECTOR 


ZNB 

—NB 

PRESENT NAV BASE Z 
COORDINATE 



1/2 UNIT 
VECTOR 


REFSMMAT 

REFSMMAT 




1/2 UNIT 
VECTOR 


SAX 


SHAFT AXIS 



1/2 UNIT 
VECTOR 


STARCODE 







STARSA VI 


VECTOR 





STARSAV2 


STAR NO 2 UNIT 

VECTOR 











j 

i 





rAMWIOa. MASS, 

PSt 

LTTrL^ IMU REALI6MMENT 



-WN W. 9. BtWWW - - 

;«>■“" /i 

- _ : colossus nc CT-9 790 

orx»L Q..S fjALLl BMW 1 ^ 

_ a /IMtUI'l* 1-30-38_ 



















ERASABLE LOCATIONS USED (CONTINUED) 

TAG 

SYMBOL 

MEANING 

ENGINEERING 

ihJit! 

SCAUNG 

MODREG 

STARAD 

PLANVEC 

STARAD+6 

THETAD 

CDUY 

SINCDUX 

SINCDUY 

SINCDUZ 

COSCDUX 

COSCDUY 

COSCDUZ 

MARKSTAT 

^SM 

^SM 

REFERENCE VECTOR 

SIGHTED DIRECTION OF 

GIMBAL ANGLES 

STABLE MEMBER DESIRED 
COORDINATE X-ROW 

STABLE MEMBER DESIRED 
COORDINATE Y-ROW 

STABLE MEMBER DESIRED 
COORDINATE Z-ROW 




PROGRAM CONSTANTS 

TAG 

GSOP 

SYMBOL 

MEANING 

ENGINEERING 
VALUE AND UNITS 


SCALING 

DEG359 

DEGREE 1 

CSS66 

CSS6640 

CSS5 

CSSUN 

RSUBM 


COSINE 32°3l'23.19* 

COSINE 7 6°/4 

(COSINE 76° - COSINE 30°)/4 
(COSINE 38°)/4 
(COSINE 5°)/4 
(COSINE 15°)/ 4 

RADIUS OF MOON 


5376381241 

060480472 

15602587 

197002688 

1738090 

METERS 


I 1 '"- ; (colossus nc rr.oion 

G.S NALL* iUftuEtf) c-/ 

I*-™ - " ^ a.#**. HrtMtilV i . si sa 




















































CHKSCODE 


























































































































































(jERM5zP) KILL MARK SYSTEM 


CLEAR EXTVBACT AND XD5PPLAG 


/ MKRELEAS\ 

\ MARK ST AT / 

| OPTCA.DR —■ - O | 

\ .-OTOPOGH 7 


iLEASE VAC AREA 



-%r- 

Lei Haul 


COLOSSUS 2-D pQ “ Z 7 3 0 



































































































































































CALLED BY SR52.1 

USED TO COMPUTE AN OPTICS LOS VECTOR TO A POINT ON 
THE EROOUD 

TRACK <bO DEGREES FORWARD OF THE LOCAL VERTICAL OF A' 
ADVANCED ORBIT A SPECIFIED MO. OF REVOLUTIONS 
ADVTRACK 'N FROM MOW 


^ APVTRACK ^ F 


PUS LOG =- O 


□ 


| PUSn Q _ s —UMITe v | 


P VECTOR 

P VECTORS F\R ST ROTAT 1C 


E STARv — MF 

DEC1 d -—AOP 1 


T ROTATION VECTOR 


INPUT : TDEC1-TIME OF INTEGRATION 

output: ratt- pos\t\om 
VATT- VELOCITY 


14 D —UNIT [VATT X RATT] 

push - ••— -unit [ratt] 

30D -4-LANDMARk(bITS 3-1)XB»T11 
AOPT\ME d »300 X MPER\0D D 


\E ESTIMATED CSM CONIC VELOCITY VECTOR 
HE ESTIMATED CSM CONIC POSITION VECTOR 
tNDMARK UDC AT ION CONTAINS NO OF ORBITS (m) 
RST ROTATION ANCLE =• NO ORBITS X APPROXIMAT 1 


'JUL tlMs*.. 2OBhl— 

















































































































































































































FROM PRECEDING SHEET 







































MEANING W 


TIIACKFLG 

I'PDATFLG 


TERMINATE R52 
V51 INITIATED 
SIGHTING LEM 
TRACKING ALLOWED 

. UPDATING BY MARKS 
ALLOWED 

| LUNAR LAT-LONG 
1 SIGHTING LANDMARK 


DO NOT TERMINATE R52 
V51 NOT INITIATED 
NOT SIGHTING LEM 
TRACKING NOT ALLOWED 
UPDATING BY MARKS 


EARTH LAT-LC 


R LUNAR RADIUS 


DESCRIPTION OF EACH REGISTER 


PRIOLARM -TARGET O' 


CURTAINS - ALARM 217 

FLASHING RESPONSE AND DISPLAY OF CELESTIAL B< 


R3 - BLANK 

PLEASE PERFORM ALTERNATE L< 




PLEASE PERFORM TERMINATION O: 


It . 


COL0550S20 
























ERASABLE LOCATIONS USED 

TAG 

SYMBOL MEANING 

ENGINEERING 

UNITS 

UNITS 

SCALING 

DESOPTT 

DESOPTS 

STARSAV2 

STARSAV1 

LANDMARK 

AOPTIME 

ST A RIND 

tsight d 

CDUY 

OPTICS TRUNNION ANGLE 

OPTICS SHAFT ANGLE 

DISPLAY NOUN FOR TRUNNION 
ANGLE 

DISPLAY NOUN FOR SHAFT 

STAR2 UNIT VECTOR 

STAR1 UNIT VECTOR 

CONIC POSITION VECTOR 

CONIC VELOCITY VECTOR 

RADIUS VECTOR 

NO OF REVOLUTIONS 

TEMPORARY 

TEMPORARY 

STAR INDICATOR 

TIME VARIABLE 

TIME OF SIGHTING 

OUTER IMU GIMBAL ANGLE 

INNER IMU GIMBAL ANGLE 

MIDDLE IMU GIMBAL ANGLE 

DEGREES 

DEGREES 

DEGREES 

DEGREES 

M/SEC 

SEC 

DEGREES 

DEGREES 

DEGREES 

M/CSEC 



__ 1 

PROGRAM CONSTANTS 

TAG 

SYMBOL 

MEANING 

ENGINEERING^ 

AND UNITS 3 

AGC 

SCALING 

38TRDEG 

20DEGSMN 

M PERIOD 

TRUNLIM 


50° TO 65° ANGLE CHECK 

65° TO 90° ANGLE CHECK 
LUNAR ANGULAR 

ROTATION IN 2 HOURS 

1/6 REVOLUTION = 60° 
MAXIMUM TRUNNION = 50° 


16666667 REV 

. 1098 REV 

0029762 REV 

16666666 REV 

2° 


i Ofhj In' ! R5Y, R55, R54 

^ W:J"~ v *-' ■ 

FC-Z710 i 
t »- ■■ i 
































P60's - ENTRY PROGRAMS 


P61 

P62 

WAKEP62 

P63 

P64 

P65 


P67 
P67. 1 
P67. 2 
S61. 1 

S61. 1C 
S61. 1A 
S61. 2 
DISPTARG 
P62. 3 


Maneuver to CM/SM separation attitude Sh. 2 

CM/SM separation and pre-entry maneuver Sh. 6 

Schedule P63 Sh. 9 

Entry initialization Sh. 10 

Post . 05G entry mode Sh. 12 

Up control entry mode Sh. 13 

Ballistic entry mode Sh. 15 

Final entry mode Sh. 16 

Final entry display (N67) Sh. 17 

Calculation for N67 display Sh. 18 

Check for proper IMU alignment and ensure that Sh. 19 

AVERAGEG is started 

Start AVERAGEG Sh. 20 

Check entry IMU alignment Sh. 21 

Calculation for N60, N63 displays Sh. 22 

Range estimator Sh. 28 

Compute desired entry attitude Sh. 30 


PRELIMINARY 




















P61: Maneuver to CM/SM Separation Attitude 
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PRELIMINARY 



































From Preceding Sheet 


( j3UMPP6l ) 



If PIPTIME has been updated, it means 
that AVERAGEG has run, so above 
calculations are invalid and must be 
redone using new state vector 


Input: RONE y , VONE y , URONE y , UNLy, 


UNITW, 


EMSALT 


Output: GMAX = maximum predicted 
deceleration during 
entry (in g's) 

VPRED = predicted inertial 

velocity at 400.000 ft 
GAMMAEI = predicted flight path 
angle (1) at 400.000 ft 
RTOGO = range from EMS altitude" 
to splash 

VIC = predicted inertial velocity 
at EMS altitude 

TTE = time to go from present 
position to EMS altitude 
(EMS altitude = altitude 
at . 05g 

G. value = 284. 643 ft 

orbital entry 
= 297, 431 ft 
lunar entry) 


CLEARMRK \ 

Enable 
extended verbs 
(EXTVBACT■ 
FC- 2130 


preliminary 











































From Preceding Sheet 



PRELIMINARY 



















































From Preceding Sheet 

| Flow in from P61 or by DSKY request 


( P62 ) 



/ t56 

•1 \ 

^ Check state ' 
vector and 
^IMU alignment 

\ Sh. 

19 / 


POSEXIT - CADR(P62.3) 


If entered from DSKY, start AVERAGEG also 


Set CM/POSE exit address to calculate 
desired . 05g gimbal angles, but without 
display via ENTRYVN. 


Start entry 
DAP in 
idle mode 
\ FC-27807 ' 


Start calculations of body rates for entry DAP 
Disable entry display: ENTRYDSP flag cleared 

























































From Preceding Sheet 



Disable RCS DAP 

Set NO-DOFLAG to inhibit further V37's 
Enable entry DAP 

Do attitude hold, beginning after first 
CM/POSE update 


(Beyond this point, "terminate" will not 
terminate the entry sequence. To uncondition¬ 
ally cancel the P60's, V37E 00E must be used. ) 


Rl: Latitude of splashpoint XXX. XX deg 
R2: Longitude of splashpoint XXX. XX deg 
R3: HEADSUP: +1 — up; -1 — down ±0000X 
(up = lift down, and vice versa) 


Proceed 



Command appropriate entry DAP 
roll angle for configuration 
requested. 

If HEADSUP = +1, ROLLC = 180° 
(lift down) 

If HEADSUP = -1. ROLLC = 0° 
(lift up) 


PRELIMINARY 
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From Preceding Sheet 



Pitch command y command nominal entry 
Yaw command attitude 

(ALFAPAD is pad loaded hypersonic trim 
angle of attack commensurate with 
expected L/D. (L/D = . 28: ALFAPAD = 
-18. 5°)) 


I-*-1 Set up entry display: executed in re-entry 

I ENTRYVN - V06N22 1 control (OVERNOUT) to display desired 

' CDU angles. 



Wait for entry DAP t 
schedule P63 when 
maneuver to entry 
_attitude is complete 


If I a [<45°, go directly to P63, 
since maneuver to entry 
attitude is complete, or nearly 
so. (CMDAPMOD is set by entry 
DAP: -0 if | a | >135° 

-1 if 135° g I <* I g 45° 

-0 if |a |< 45° 

- 1 if in atmosphere) 
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(WAKEP62) 


Called from entry DAP at transition from 
I a | >450 to I a I <45° if P63 flag = K> (P63 
flag must first become ♦ 1 which it does when 
|Q , r>45°) (See FC-2780) 


\TASKOVEly 


Schedule P63 


PRELIMINARY 
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C P63 


Called from WAKEP62, or flow in from P62, 
when entry attitude has been achieved. 
Activate entry guidance. 


NEWMODEX 
( Display 

| Major Mode 


Major Mode display: P63 


Put STARTENT i 


pnqF-VTT - rAnBKTARTFNT) I sequence following CM/POSE to 
POSEXIT - CADR(STARTENT) | initialize entry steering. (STARTENT 


will set POSEXIT to CADR (SCALEPOP) 
for subsequent passes) (STARTENT 

_ _ omits display) 

| ENTRYVN — V06N64 | Set up en try display executed in re-entry 
control (OVERNOUT) to display noun 64 
each 2 sec: 

Rl: XXX. XX g drag acceleration 
R2: XXXXX fps velocity 
R3: XXXX. X nm distance to splash 
point (negative if will 
fall short) 

t of 


Disable / Disable Group 4 - display is restarted n 
Group 4 / re-entry control (Group 5) 



Remove V06N22, if present. P63 
display begins on second pass thru 
entry steering 
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/ Disa 
/ Grouj 

ble / 

p 4 / 

irts / 



Xendofjob/ 


Disable Group 4 - display is restarted 
in re-entry control (Group 5) 
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Called from re-entry control when 0. 05g is 
initially exceeded. 


/newmode': 

I Display 
I Major Mode 


Major Mode display P64 




Return vi; 
DANZIG 


7 


Set up entry display executed in re-entry 
control (OVERNOUT) to display noun 74 

Rl: XXX. XX deg roll command (ROL.LC) 
R2: XXXXX. fps velocity (VMAGI) 

R3: XXX. XX g drag (D) 

(Noun 68 display may still be called up) 
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Clear'-1 Disable entry display until the 

ENTRYDSP following DSKY procedure is c 
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C P66 ) 


Entered when drag <Q7 



Set up entry display to display desired 
gimbal angles ( noun 22) 

Rl: XXX.XX deg 
R2: XXX. XX deg 
R3: XXX. XX deg 
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CHD 


Called from re-entry control when final 
phase trajectory is entered (when drag level 
exceeds 0. 2 g) 


NEWMODEX 


Set up entry display executed in re-entry control 
(OVERNOUT) to display noun 66: 

Rl: XXX. XX deg roll command (ROLLC) 
R2: XXXX. X nm cross-range error 
R3: XXXX. X nm down-range error 
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Calculation for final display, N67 


flagword 
bit 13 



Called from STEEROFF (reentry control) initially 
when velocity < lOOOft/sec. Subsequent calls are 
from TARGE TNG 

Set up inputs for LAT-LONG: 
use pad radius for altitude 



'LAT-LONG 


( P67. 3 


Inputs: =ALPHAV V (position vector), LUNAFLAG 

Outputs: = latitude in LAT 1 

longitude in LONG l of given position 
altitude in ALT J 

For display noun 67 



Normal entry guidance exit without display 
(display is done in P67. 1) 
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Assure that AVERAGEG is operating and check 
that IMU is aligned properly for entry 


Sets IMUSE flag to prevent zeroing IMU CDUs by 
a restart 

Possible prog alarm, with alarm code 00210 
(IMU not on) or 00220 (IMU orientation not known 
i.e. no REFSMMAT) 


Test flagword 1, bit 1: 

Is AVERAGEG on? 

Flag set or reset i 
Yes SERVICER 

If AVERAGEG on, skip 
start-up sequence 

Precision integration of state vector 
Outputs: 

RN1, VN1: state vector in future by 
amount of tolerance 
PIPTIME 1: time of RN1, VN1 
MPAC, : ATIME, current time to 
Qp PIPTIME 1 


(Save for restart protection relative to TBASE4) 


/ Set up restarts 
/to schedule S61. 1C 
' as a WAITLIST 
task in S61DT csec 


\endofjob7 


preliminary 


MIT INSTRUMENTATION LAI 
CAMIRIDGE, MASS. 

DRAWN Af 


PRGMR 


DOCJAA 


_ 



APOLLO GUIDANCE AND NAVIGATION 


COLOSSUS 2D FC-2760 





















































FINDVAC 

job 


(S61. 1A -1 is basic code entry point for S61. 1A) 


LAVGEXIT = 2 C A DR( SE RVEXIT) 


/ Group < 


Set up restarts 
o schedule S61. 1A -1 , 

is a FINDVAC job with/ 
priority 13 


Protect scheduling of S61. 1A 


Group 5. 41 


Set up restarts 
o schedule PREREAD/ 
a WAITLIST task 
immediately 


Protect AVERAGEG 



This starts REA DA CCS for AVERAGEG updating 
IprereAd! of the state vector. (READACCS reschedules itself 

l-' every 2 secs and continues running throughout 

entry) (PREREAD will go to TASKOVER) 


PRELIMINARY 






































Entry IMU Alignment Check 


X 


| Clear OVFIND T Initialize overflow indicator 

T 

f- -- „ . ^ o I Unit (VXR) in stable member coordinates 

| MPAC y = Unit[REFSMMAT M (VN v X RN y )] | ( unit norma i to trajectory plane) 


-SM 

within 30° of 
VXR 



\FC-2070 / 
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Noun 60 and Noun 63 Calculation Subroutine 
Calculate entry display (noun 60) of maximum 
acceleration expected, also expected inertial 
velocity and entry angle, that will obtain at 
400K FT above Fischer Ellipsoid 



Load l/'Tfiior earth orbit 
[5005750271xl0' 5 (csec 2 /m 


1/ \l H for earth 

Saved from 
SERVICED by 
NEWRNVIN (P61) 


Conic parameters in pushlist (for 
use by TFF subroutines) 

First guess at terminal radius (R^) 

at n ominal EMS altitude _ 

RTRIAL d =RPAD + nominal 0. 05G 

f 284,643 


Input: terminal radius (MPAC D > (R h > 

Conic parameters in pushlist 
(from TFFCONIC) 

Output:' "NRTERM = 'normalized R h 
TFFX = -A Z 2 or —i- 

I I 0(2 

TFFTEM = PZ |Z | or 


SGN (Q 


5«-) 

z ' 
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NRTERM~| 
TFFX y 
TFFTEMJ 

\TD M4n 


MPAC = sin 
CDELF/2 = 
cos («f) 


From CALCTFF 


From TFFCONIC 


(6f), where ( 6f ) is transfer 
angle from present to 
EMS altitude. 



Input : MPAC = S in ' <*«. UNI v = unit (V Q x R Q > 

CDELfP/2 = ■ cos (fif) 

Output: MPAC d = ERADM = Radius of earth 
(R ) at latitude of estimated terminal 
radius (R^) 


- -j Corrected estimate of terminal 

MPAC d < -MPAC d + EMSALT d radius (R h ) 

- --' EMSALT d = 284, 643 ft (pad loaded, 

earth orbital) 

EMSALT d = 297, 431 ft (pad loaded. 




NRTERM 

TFFX 

TFFTEM 


From CALCTFF 


NR MAG 

Output: MPACp = sin (fif) 
CDELF/2 


From TFFCONIC 
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From Pre< 


eding Sheet 


/FISHCALCX Input: sin (6f), 


(6f), UNI y 


/ Calculate \ 
Fischer y 
\ radius / 
\ FC~2320 / 


Output: URH unit radius vector at . 05 g point 
ERADM, Fischer radius as latitude of 
estimated . 05g point 



Input: URHy 

RTy = Unit vector at impact point 
Output: MPAC d = Range angle in revolutions 
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From Preceding Sheet 



PL2 d <-'MPAC D 

T 

Next Sheet 


Calculation of maximum G for display (noun 60) 


Predicted flight path angle at 
J 300, 000 feet (« e ) 
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First guess of terminal radius 
at 400, 000 ft 

ERADM d = earth radius at EMS 
latitude ( from FISHCALC ) 


MPACq = terminal radius 

Pushlist 

Output: NRTERM, TFFX, TFFTEM 


NRTERM I 
TFFX 
TFFTEM J 
NRMAG 
MPAC n = s 


From CALCTFF 


From TFFCONIC 
n (6f ) where (6f) is 


the transfer angle 

CDELF/2 = cos (6f) from present 

position to 400, 000 ft 


CDELF/2 = 
UNI V = unit 
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"~T1_ 

Corrected estimate of radius 
at 400, 000 feet 


mpac d «- mpac d + 400KFT d 
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Note: 


Effect of RTGO in low-word 
GAMMAEJ on DSKY is 
negligible ( K 0. 005 deg) 
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Range estimator 


Save QPRET 
, 60GENRET 


C ( MPACq ) = range angle estimate 


KT^ = 1100 

TTE = tj.£ = time of free fall 



DTEAROT = KT 01 6+ t ff 
DTEAROT d >*-KTETA1 d> MPAC d + TTElp 
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Input: URH y ( Unit radius at . 05g point) 
RTy ( Unit target vector ) 
Output: MPAC d , range angle in 
revolutions 
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^ P62. 3 ^ 


QPRET *— 
CADR 
[ENDEXIT] 



Next Sheet 


preliminary 


If ENTRYDSP = 0, omit entry 
display ( ENTRYVN ) 

If ENTRYDSP = 1, do entry display 
(ENTRYVN) 






























From Preceding Sheet 



MIT INSTRUMENTATION LAB 
CAMBRIDGE. MASS. 

APOUO GUIDANCE AND NAVIGATION 

DRAWN w 


P60's 

ANALST 


COLOSSUS 3D 

WMF- 

DOCMR 



APPR’O 


REV 1 |SHEET 33 Of 35 































SUBROUTINES CALLED WHICH ARE 
FLOWED ON OTHER FLOWCHARTS 


Subroutine 

Name 

Where 

Flowed 

Description 

Where 

Called 

ALARM 

FC-2140 

Set alarm code 

Sh. 21 

CALCGA 

FC-2260 

Calculate desired gimbal angle (s) 

Sh. 33 

CALCTFF 

FC-2320 

Calculate time of free fall 

Sh. 22, 23, 
27 

CLEANDSP 

FC-2130 

Blank DSKY 

Sh. 10 

CLEARMRK 

FC-2130 

Enable extended verbs 

Sh. 4 

CM/DAPIC 

FC-2780 

Start entry DAP 

Sh. 6 

CM/ DA PON 

FC-2780 

Enable entry DAP 

Sh. 7 

DELAYJOB 

FC-2070 

Delay job specified time 

Sh. 21 

EARROT2 

FC-2250 

Locate predicted impact point 

Sh. 30 

FISHCALC 

FC-2320 

Calculate Fischer radius 

Sh. 23, 24, 
27 

LAT-LONG 

FC-2280 

Compute latitude and longitude 

Sh. 18 

MIDTOAV2 

FC-2290 

Precision integration of state vector 

Sh. 19 

NEWMODEX 

FC-2030 

Change major mode 

Sh. 5, 10, 
12, 13, 15, 
16 

PREREAD 

FC-2683 

Start READACCS 

Sh. 20 

PREVGAM 

FC-2320 

Calculate velocity magnitude and flight path 
angle 

Sh.25,28 

REFAZE10 

FC-2770 

Entry control 

Sh. 13 

R02BOTH 

FC-2210 

IMU status check 

Sh. 19 

SERVNOUT 

FC-2770 

Normal entry guidance exit without display 

Sh. 18 

STARTEN1 

FC-2770 

Calculate initial traget vector 

Sh. 3 

TEFCONIC 

FC-2320 

Compute conic parameters 

Sh. 22 

TFF/ TRIG 

FC-2320 

Calculate sin and cosine of transfer angle 

Sh. 23, 27 

VGAMCALC 

FC-2320 

Calculate velocity magnitude and flight path 
angle 

Sh. 25 
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FLAGS 


Name 

Meaning When Set 

Meaning When Clear 

Where 

Set 

Where 

Cleared 

Where 

Tested 

AVEGFLAG 
Flagword 1 
bit 1 

AVERAGEG(SERVICER) 
to continue 

AVERAGEG(SERVICER) 
to cease 



Sh. 19 

CM/DSTBY 
Flagword 6 
bit 2 

Entry DAP activated 

Entry DAP not activated 


Sh. 17 


CPHIFLAG 
Flagword 0 
bit 15 

Output of CALCGA is 
CPHIX 

Output of CALCGA is 
THETAD 


Sh. 33 


ENTRY DSP 
Flagword 6 
bit 13 

Do entry display via 
ENTRY VN 

Omit entry display 

Sh. 8, 
14, 16 

Sh. 14 


ERADFLAG 
Flagword 1 
bit 13 

Earth: compute Fischer 
ellipsoid radius 

Moon: use fixed radius 

Earth: use fixed radius 

Moon: use RLS for lunar 
radius 


Sh. 18 


GYMDIFSW 
Flagwood 6 
bit 1 

CDU differences and 
body rates computed 

CDU differences and 
body rates not computed 


Sh. 17 


LUNAFLAG 
Flagword 3 
bit 12 

Lunar LAT-LONG 

Earth LAT-LONG 


Sh. 18 


. 05GSW 
Flagword 6 
bit 3 

Drag over . 05G 

Drag less than . 05G 


Sh. 3 
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PRECEDING SHI 


JJ--1Z. I 


INITIALIZE INDEX V/ 


CHC > 



[VREFER4I JT] < V< t>REFER*(Jd + l)] 


[VBEFER»(jJ+lj]-[yREFER*.)j]| 


INEAR INTERPOLATION FACTOR 


V PARAMETERS 


[FAT 5]— [VREFER#(l3+JjJ]+GRA0([vREFER*(i4+djj]-[yREFER*(l3+JjJ]) 
[>X + 4]-^QvREFER#(E6+JJ)]+&RAD(CvREFER#(i7+Jj)]-[vREFER*(2A+JJ J]) 
[FX + 3]-^[vREFER*(39+Jjj]+6RAD((yREFER*(40+JO^-(yREFER#(39+Oj)]) 
[>X + 2]—- [VREFER*(S2+JJ)] + &RAo([VREFER#(53+JjJ]-[yREFER*(S2'MJJ]J 
[>X + l]—- [vREFER*(6S+Jjj]+&RAO([:VREFER#(66+Oji]-[vREFER*(t,S+Jjj]J 
[ Fx] —— [VREFER*(7B+Jj)] + &RAD([;vREFER#(79+JJ^]-(vREFER*(7BtJj)]) 


R/A RAN&E/ACCELERATION 
-R/R -RANGE/ALTITUDE R 


i, tF drag(negative accelera- 

D-L/D RAN&E/ORAS X LIFT/ 


V~ O* +2]+[FX + 4]([FX +3]-R00lV[FX + s](o + [FX + i]) I R p „ ED = R^- SP/fi R (R „ tF 
’-' -R; + «R/6A(D-D„„j 



[>REOANG SAVED FOR TM (S.P.J 
GAMMAEI = (PREOANG, 0 J/] 


NEXT SHEET 




CAMWUCE. *A5S. 

REENTRY CONTROL 

COLOSSUS ITC , PC-2 770 
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ENTRY DIGITAL AUTOPILOT 


CM/DA PIC 

CM/DAPON 

READGYMB 

ATTRATES 

EXDAP 

CM/RCS 

CM/FDAI 


FLUSHJET 
RATEA VG 
ANGOVCOR 
SETJTAG 


ENTRY DAP START ROUTINE 

RCS DAP ENTRY TO DAP CHANGEOVER ROUTINE 

READ GIMBAL ANGLES 

INTRA-ATMOSPHERIC DAP 

EXTRA-ATMOSPHERIC DAP 

ENTRY ROLL DAP 

FDAI ERROR DISPLAY AND DOWNLINK 
ATTITUDE/RATE DEAD ZONE TEST 

3 DEGREE ATTITUDE DEADZONE TEST 

4 DEGREE/SEC RATE DEADZONE TEST 
2 DEGREE/SEC RATE DEADZONE TEST 
TURN OFF ALL RCS JETS 
AVERAGE RATE ROUTINE 

ANGLE OVERFLOW CORRECTION ROUTINE 
ENABLE ENTRY ROLL DAP 


PRELIMINARY 


ENTrr DKsmvL autopilot 























ENTRY DIGITAL AUTOPILOT — OVERALL VIEW 


3 


INITIALIZE C.IMBAL READ INTRA ATMOSPHERIC EXTRA ATMOSPHERIC 

AMO START AMO RATE DERIVATION ENTRY DAP ENTRY DAP 










































































































































































































































































































































































































































































































































































































extra atmospheric dap 
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DCADZONE. TEST ROUTINE 
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JET TURN OFF ROUTINE 



AVERAGE RATE ROUTINE 



ANGLE OVERFLOW CORRECTION ROUTINE 
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Index Section 17 


ACCOMP FC-2300 
SCROLL FC-2400 
ACTIVE FC-2626 
FC-2627 
ACTLIM FC-2440 
FC-2440 
ADVANCE FC-2626 
FC-2627 
ADVORB FC-2590 
FC-2730 
ADVTRK FC-2070 
FC-2730 
AGAIN FC-2620 
FC-2680 
ALARM FC-2627 
FC-2020 
FC-2140 
FC-2200 
FC-2235 
FC-2683 
FC-2760 
ALARM2 FC-2140 
ALARUMS FC-2545 
ALFLT FC-2530 
ALFLT1 FC-2530 
ALLOOP FC-2530 
ALM/END FC-2370 
FC-2450 
FC-2605 
FC-2235 
ALMXITA FC-2626 
ALHAYSG FC-2530 
AMBGOPDT FC-2370 
FC-2380 
FC-2460 
AMOONFLG FC-2290 
FC-2540 
FC-2O7O 
FC-2650 
FC-2650 
APSESW FC-2310 
FC-2020 
APSIDES FC-2310 
FC-2641 
ASTNFLAG FC-2O2O 
FC-2680 
FC-2681 
ATERJOB FC-2540 
ATOPCSM FG-2290 
FC-2300 
ATOPLEM FC-2290 
FC-2300 
ATOPOTF FC-2670 
ATTCHFLG FC-2370 
FC-2070 
ADGEKOGL FC-2320 
FC-2642 
AVAFLAGA FC-2644 


Orbital Integration ENTRY 9 

RCS DAP Jet Selection Logic ENTRY 5 

P32, P72—CSI CALLED 16 

P33, P73--CDH CALLED 2 

TVC DAP ENTRY 16 

TVC DAP ENTRY 16 

P32, P72--CSI ENTRY 9 

P33, P73--CDH CALLED 2 

P22 Orbital Navigation CALLED 7 

R52, R53, R56 ENTRY 5 

Service Routines C-6 

R52, R53, R56 S-5 C-2 T-8 

P30, P31 CALLED 7 

Thrust Programs (P40, P41) ENTRY 38 

P33# P73—CDH CALLED 3 

Fresh Start and Restart CALLED 20,32 

Alarm and Abort ENTRY 4 

T4R0PT CALLED 6,15,16,29,32.33,41,42 

IMU Extended Verbs (V4O, V41, V42) CALLED 6,7 

Servicer CALLED 16 

P60's Entry Programs CALLED 21 

Alarm and Abort ENTRY 4 

PI7/P77—TPI Search Programs ENTRY 13 

Prelaunch Initialization and Gyro Compassing ENTRY 16 

Prelaunch Initialization and Gyro Compassing ENTRY 16 

Prelaunch Initialization and Gyro Compassing ENTRY 15 

DAP Interface and Service Routines CALLED 2,6,10 
Stroke Test Package CALLED 1 
Navigation Extended Verbs CALLED 2,6 
IMO Extended Verbs (V4O, V41, V42) CALLED 2,3,4,6,8 
P32, P72—CSI ENTRY 22 

Prelaunch Initialization and Gyro Compassing ENTRY 20 
DAP Interface and Service Routines ENTRY 25 
DAP Interface Initialization and Phase I CALLED 4,8 
Roll Autopilot CALLED 8 

Integration Initialization S-20 C-20 

Pll Earth Orbit Insertation Monitor 

Service Routines C-6 

Orbital Parameters Display 

Orbital Parameters Display 

Conic Subroutines S-24 C-24 

Fresh Start and Restart S-6 

Conic Subroutines ENTRY 38 

Common Targeting Subroutines CALLED 13 

Fresh Start and Restart C-26,6 

Thrust Programs (P4O, P41) 

Cloktask and Clockjob S-6 C-13 T-6 

Pll Earth Orbit Insertation Monitor ENTRY 10 

Integration Initialization ENTRY 5 

Orbital Integration CALLED 33,38 

Integration Initialization ENTRY 5 

Orbital Integration CALLED 33,38 

P76 Target Delta V Program CALLED 4 

DAP Interface and Service Routines S-13 C-13 

Service Routines C-6 

TFFConics ENTRY 15 

P37 Return To Earth CALLED 31 

P38/P78; P39/P79 CALLED 3,9 


T-17,18 


T-8,11 
T-ll 


T- 20 
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AVEGFLAG FC-Z020 
FC-2650 
EC-2650 
FC-2683 
FC-2760 
AVEMIDSW FC-2290 
FC-2070 
AVETOMID FC-2290 
FC-2683 
AVFLAG FC-2545 

FC-2620 
FC-2626 
FC-2627 
FC-2070 
FC-2630 
FC-2640 
FC-2641 
FC-2644 
FC-2680 
AVFLAGA FC-2545 
FC-2627 
FC-2630 
FC-2640 
AVFLAGP FC-2545 
FC-26 26 
FC-2627 
FC-2630 
FC-2640 
FC-2644 
AVGEND FC-2683 
AVWMIDSW FC-2300 
AXISGEN FC-2720 
AZMTHCG1 FC-2530 
A-PCHK FC-2290 
FC-2300 
BADESD FC-2550 
BAILOUT FC-2060 
FC-2140 
FC-2240 
FC-2242 
BANKCALL FC-2080 
BANK JUM P FC-2080 
BDF2Z FC-2400 
BDROLL FC-2400 
BIGTIMS FC-2310 
BLANKET FC-2360 
FC-2590 
FC-2600 
FC-2626 
FC-2190 
FC-2242 
FC-2720 
BVECTORS FC-2550 
FC-2590 
CA+ECE FC-2200 
CALCGA FC-2720 
FC-2760 
CALCGRAV FC-2680 
FC-2683 
CALCGTA FC-2540 


Fresh Start and Restart C-34,6 

Orbital Parameters Display 

Orbital Parameters Display 

Servicer S-3 T_ 8 

P60's Entry Programs T_ 1 

Integration Initialization S-16 

Service Routines C-6 

Integration Initialization ENTRY 16 

Servicer CALLED 25 

P17/P77—TPI Search Programs S-4 C-4 

P3O, P31 S-8 

P32, P72—CSI S-2 C-2 

P33, P73—CDH S-l C- 1 

Service Routines C-6 

P34/P74 TPI Targeting S-2 C-2 

P35-P75 TPM Targeting S-l C-l 

Common Targeting Subroutines 

P38/P78: P39/P79 S-3 C-3 T-12 

Thrust Programs (P40, P41) S-33,36 

PI7/P77—TPI Search Programs CALLED 3 

P33, P73—CDH CALLED 1 

P34/P74 TPI Targeting CALLED 2 

P35-P75 TPM Targeting CALLED 1 

PI7/P77—TPI Search Programs CALLED 3 

P32, P72—CSI ENTRY 2 

P33, P73—CDH CALLED 1 

P34/P74 TPI Targeting CALLED 2 

P35-P75 TPM Targeting CALLED 1 

P38/P78; P39/P79 CALLED 3,9 

Servicer ENTRY 25 

Orbital Integration C-40 

P52 IMU Realignment Program CALLED 20 

Prelaunch Initialization and Gyro Compassing ENTRY 

Integration Initialization CALLED 21 

Orbital Integration ENTRY 38 

P20 Rendezvous Navigation CALLED 34 

Waitlist CALLED 13 

Alarm and Abort ENTRY 5 

SXTMARK CALLED 1 

R57 Optics Calibration Routine CALLED 2 

Inter-bank Communication ENTRY 1 

Inter-bank Communication ENTRY 2 

RCS DAP Jet Selection Logic ENTRY 11 

RCS DAP Jet Selection Logic ENTRY 7 

Conic Subroutines ENTRY 21 

R64 (RO5)—S-Band Antenna CALLED 5 

P22 Orbital Navigation CALLED 3,6,16 

P23 Cislunar Midcourse Navigation CALLED 12 

P32, P72—CSI CALLED 2 

Extended Verbs CALLED 5 

R57 Optics Calibration Routine CALLED 3,4 
P52 IMU Realignment Program CALLED 18 
P20 Rendezvous Navigation ENTRY 39 
P22 Orbital Navigation CALLED 15 
T4RUPT CALLED 43 

P52 IMU Realignment Program CALLED 9 
P60's Entry Programs CALLED 33 
Thrust Programs (P40, P41) CALLED 36 
Servicer ENTRY 22 

Pll Earth Orbit Insertation Monitor CALLED 13 


T-3,4 

T-3 


T-15 
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CALCMAN2 

CALCMAN3 

CALCN83 

CALCN05 
CALCRVG 
CALCSCA 
C ALCSMSC 
CALCTFF 


CALCTPER 


CAL53A 

CCSHOLE 

CDHMVR 

CURVE 

CDUINC 

CDtJLOGIC 

CDUTOCSM 
C DUTODCM 

CDUTRIG 


CHAZFOGC 

CHECKCTP 

CHECKG 

CHECKMM 


CHKCOMED 

CHKPOOH 


CH KSCODE 

CHKSDATA 
CKMID2 
CKOPTVP 
CLEANDSP 
CLEARMRK 


CLOCKJOB 

CLOKTASK 


CMDAPABM 


FC-2720 P52 inn Realignment Program CALLED 26 

FC-2350 Maneuver Calculations and Steering S-9 C-lO 

FC-2O7O Service Routines C-6 

FC-2350 Maneuver Calculations and Steering S-9 

FC-2683 Servicer CALLED 19 

FC-2700 P47 Thrust Monitor ENTRY 6 

FC-2683 Servicer CALLED 19 

FC-2683 Servicer ENTRY 20 

FC-2730 R52, R53, R56 CALLED 7 

FC-2720 P52 IMU Realignment Program ENTRY 25 

FC-2650 Orbital Parameters Display CALLED 20 

FC-2650 Orbital Parameters Display CALLED 20 

FC-2760 P60's Entry Programs CALLED 22,23,27 

FC-2320 TFFConics ENTRY 5 

FC-2650 Orbital Parameters Display CALLED 19 

FC-2650 Orbital Parameters Display CALLED 19 

FC-2720 P52 IMU Realignment Program ENTRY 22 

FC-2140 Alarm and Abort ENTRY 5 

FC-2626 P32, P72—CSI CALLED 16 

FC-2627 P33, P73—CDH ENTRY 5 

FC-2200 T4RUPT ENTRY 4 

FC-2100 RTB Op Codes ENTRY 10 

FC-2350 Maneuver Calculations and Steering CALLED 22 

FC-21OO RTB Op codes ENTRY 3 

FC-2340 R60 Attitude Maneuver CALLED 5 

FC-234O R60 Attitude Maneuver CALLED 5 

FC-2350 Maneuver Calculations and Steering ENTRY 22 

FC-2325 Rendezvous Parameters Displays CALLED 4 

FC-2540 Pll Earth Orbit Insertation Monitor CALLED 13 

FC-2550 P20 Rendezvous Navigation CALLED 13,14 

FC-2700 P47 Thrust Monitor CALLED 8 

FC-2720 P52 IMU Realignment Program CALLED 9,13 

FC-2730 R52, R53, R56 CALLED 7 

FC-2530 Prelaunch Initialization and Gyro Compassing ENTRY 33 
FC-2310 Conic Subroutines ENTRY 19 

FC-2530 Prelaunch Initialization and Gyro Compassing ENTRY 39 

FC-2605 Navigation Extended Verbs CALLED 6 

FC-2O3O Phase Table Maintenance ENTRY 3 

FC-2240 SXTMARK CALLED 2,8 

FC-2730 R52. R53, R56 CALLED 11 

FC-2530 Prelaunch Initialization and Gyro Compassing ENTRY 13 

FC-2330 R62 Crew Defined Maneuver (V49) CALLED 2 

FC-2360 R64 (R05)—S-Band Antenna CALLED 2 

FC-2361 V89 (R63) CALLED 2 

FC-2190 Extended Verbs CALLED 2 

FC-2720 P52 IMU Realignment Program CALLED 18 

FC-2730 R52, R53, R56 ENTRY 12 

FC-2720 P52 IMU Realignment Program CALLED 20 

FC-2300 Orbital Integration ENTRY 36 

FC-2530 Prelaunch Initialization and Gyro Compassing ENTRY 26 

FC-2760 P60's Entry Programs CALLED 10 

FC-2O2O Fresh Start and Restart CALLED 24,36 

FC-2240 SXTMARK CALLED 8 

FC-2730 R52, 853, R56 CALLED 5,14 

FC-2760 P60'S Entry Programs CALLED 4 

FC-2681 Cloktask and Clockjob ENTRY 4 

FC-2626 P32, P72~CSI CALLED 23 

FC-2680 Thrust Programs (P40, P41) CALLED 12 

FC-2681 Cloktask and Clockjob ENTRY 3 

FC-2O7O Service Routines C-6 
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CMDSOUT 

CMOONFLG 


CM/DAPIC 

CM/DAPON 

CM/DSTBY 


CM/POSE 

CNTNOP3O 

CNTRCHK 

COAALIGN 

COGAFLAG 


COMPUTED 

COMPVER 

CPHIFLAG 


CREWMAN'! 

CFS61-1 

CSI/A 

CSMCONIC 


CSMPREC 


CSM STORE 
CULTFLAG 


CURTAINS 

C33TEST 

OAPBITl 


>2430 TVC Start-up, Executive, and Service Routines ENTRY 21 
>2290 Integration Initialization S-5,18 C-5,18 

>2550 P2O Rendezvous Navigation 
>2590 P22 Orbital Navigation 
>2600 P23 Cislunar Midcourse Navigation 

>2630 P34/P74 TPI Targeting . T * 14 

>2641 Common Targeting Subroutines 

>2760 P60's Entry Programs CALLED 6 

>2760 P60’s Entry Programs CALLED 7 

>2070 Service Routines C-6 

>2683 Servicer C-26 T-5 

>2760 P60's Entry Programs C-17 

>2780 CM Entry Digital Autopilot 1 

>2683 Servicer CALLED 19 

>2620 P30, P31 ENTRY 6 

>2120 AGC Block Two Selfcheck ENTRY 7 

>2530 Prelaunch Initialization and Gyro Compassing ENTRY 36 

>2310 Conic Subroutines S-22 C-22,33 

>2070 Service Routines C-6 

>2670 P76 Target Delta V Progran ENTRY 2 

>2620 P30, P31 CALLED 5,10 

>2626 P32, P72—CSI ENTRY 22 

>2070 Service Routines C-6 

>2530 Prelaunch Initialization and Gyro Compassing ENTRY 26 

>20y0 Service Routines C-6 

>2760 P60's Entry Programs C-33 

>2330 R62 Crew Defined Maneuver (V49) ENTRY 2 

>2550 P20 Rendezvous Navigation ENTRY 11 

>2626 P32, P72—CSI ENTRY 11 

>2290 Integration Initialization ENTRY 7 

>2360 R64 (R05)—S-Band Antenna CALLED 3 

>2361 V89 (R63) CALLED 4 

>2545 P17/P77—TPI Search Programs CALLED 4,5 

>2590 P22 Orbital Navigation CALLED 3 

>2190 Extended Verbs CALLED 3,4 

>2720 P52 IMU Realignment Program CALLED 11 

>2730 R52, R53, R56 CALLED 8,9 

>2290 Integration Initialization ENTRY 6 

>2325 Rendezvous Parameters Displays CALLED 7 

>2590 P22 Orbital Navigation CALLED 19 

3-2641 Common Targeting Subroutines CALLED 15 

>264? P37 Return To Earth CALLED 15 

1-2644 P38/P78! P39/P79 CALLED 12 

3-2720 P52 IMU Realignment Program CALLED 8,10 

>2545 P17/P77—TPI Search Programs CALLED 4 

3-2641 Common Targeting Subroutines ENTRY 15 

G-2O7O Service Routines C-6 

3-2720 P52 IMU Realignment Program S-17 C-17 

C-2730 R52, R53, R56 T-7 

3-2140 Alarm and Abort ENTRY 4 

C-2200 T4RUPT ENTRY 38 

C-2370 DAP Interface and Service Routines S-5 C-3,4 

C-243O TVC Start-up, Executive, and Service Routines 

C-2450 Stroke Test Package T-l 

C-2540 Pll Earth Orbit Insertation Monitor S-19 

C-2O2O Fresh Start and Restart C-6 T-2 

C-2680 Thrust Programs (P4O, P41) S-22 C-21 

C-2780 CM Entry Digital Autopilot C-5 


T-11,12,17 
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DAPBIT2 FC-; 


DAPDA^Bl I 
DAPDISP I 
DAPINIT ] 
DCMTOCDU I 
I 

DELAYJ03 FC-; 


PELBSPL FC- 


DELTIME I 
DIFEQ+O 1 
DIFEO+1 1 
DIFFQ+2 1 
DIMOFLAG 1 


DISDVLVC I 
DISPLAYE I 
DISPMGA I 
DTSPTARG I 
DIVIDE I 
DLY2-L I 
DMENFLG I 


DNTMFAST i 
DOFSTART I 
DOW.. ! 
DOW. • 1 I 
DOWNENT2 1 
DOWNFLAG I 
DPADD 1 
DPIFTFLG I 


2370 DAP Interface and Service Routines S-4,5 
2430 TVC Start-up, Executive, and Service Routines 
2450 Stroke Test Package T “l 

2540 PH Earth Orbit Insertation Monitor S-19 
2020 Fresh Start and Restart C-6 1 

2680 Thrust Programs (P40, P41) C-21,22 

2780 CM Entry Digital Autopilot C-5 

2680 Thrust Programs (P40, P41) S-25 C-7 

•2370 DAP Interface and Service Routines ENTRY 6 
2430 TVC Start-up, Executive, and Service Routines ENTRY 
2340 R60 Attitude Maneuver CALLED 7 
2350 Maneuver Calculations and Steering ENTRY 20 
2325 Rendezvous Parameters Displays CALLED 3 
2360 R64 (R05)—S-Band Antenna CALLED 5 
2550 P20 Rendezvous Navigation CALLED 31 
2626 P32, P72—CSI CALLED 6 
2020 Fresh Start and Restart CALLED 31 
2070 Service Routines ENTRY 8 
2190 Extended Verbs CALLED 5 
2650 Orbital Parameters Display CALLED 12 
2650 Orbital Parameters Display CALLED 12 
2760 P60's Entry Programs CALLED 21 
2340 R60 Attitude Maneuver CALLED 6,7 
2350 Maneuver Calculations and Steering ENTRY 16 
2320 TFFConics ENTRY 13 

2650 Orbital Parameters Display CALLED 13 
2650 Orbital Parameters Display CALLED 13 
■2310 Conic Subroutines ENTRY 25 
2300 Orbital Integration ENTRY 27 
2300 Orbital Integration ENTRY 27 
2300 Orbital Integration ENTRY 32 

•2290 Integration Initialization S-4,16 C-3,6,7,8,1‘ 

2300 Orbital Integration C-37 T-9,1 

■2550 P20 Rendezvous Navigation S-4,21 C-7 

■2580 P21 Ground Track Determination C-3,4 

•2590 P22 Orbital Navigation S-l0,18 C-11,18 

■2600 P23 Cislunar Midcourse Navigation S-15 C-14 

■2070 Service Routines C-6 

■2626 P32, P72--CSI ENTRY 8 
■2630 P34/P74 TPI Targeting ENTRY 15 
■2620 P30, P31 ENTRY 5 
■2760 P60's Entry Programs ENTRY 28 
■2600 P23 Cislunar Midcourse Navigation ENTRY 22 
■2060 Waitlist ENTRY 10 

■2590 P22 Orbital Navigation S-15 C-12,26 T- 

■2600 P23 Cislunar Midcourse Navigation C-ll 

■2610 Measurement Incorporation 

■2O7O Service Routines C-6 

-2200 T4RUPT ENTRY 42 

-2020 Fresh Start and Restart ENTRY 3 
■2300 Orbital Integration ENTRY 41 
-2300 Orbital Integration ENTRY 42 
-2070 Service Routines ENTRY 3 
-2O7O Service Routines ENTRY 4 

■2370 DAP Interface and Service Routines ENTRY 26 

-2O7O Service Routines C-6 

- C-31,32 


>2200 T4RUPT 
>2220 P06 GNCS Power Dc 
>2683 Servicer S-25 
>2720 P52 1N0 Realignmc 


C-3 

: Program S-4,23 


C-3 
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DSKYFLAG 


DSPOUTSB 

DSPTAB+1 

DYNDISP 

D6OR9FLG 


EARROT2 

EARTHR 

EARTHR*3 

EARTHR* 

ECSTEER 

EGSW 

ENABL2 
ENATM A 
ENDEXT 

ENDMARK 

ENDTNON 

ENGINOFF 

ENGONFLG 

ENG2FLAG 

ENTRYDSP 

ERADFLAG 


ERASCALC 

ERRORLIM 

ERTHRYSE 

ESTIMS 

ETPIFLAG 

EXDAPOFF 

SXRSTRT 

EXTVBAC T 


FALTON 


>2060 Waitlist 

>2070 Service Routines C- 

>2150 Keyrupt and Oprupt S-4 
>2200 T4R0PT 
>2200 T4RUPT ENTRY 47 

>2070 Service Routines S-13 C- 

>2681 Cloktask and Clockjob ENTRY 4 
>2290 Integration Initialization 
>2300 Orbital Integration 
>2550 P20 Rendezvous Navigation 
>2590 P22 Orbital Navigation S-l0,18 
>2600 P23 Cislunar Midcourse Navigatioi 
>2070 Service Routines C- 

>2760 P60's Entry Programs CALLED 30 
>2530 Prelaunch Initialization and Gyre 
>2530 Prelaunch Initialization and Gyrt 
>2540 Pll Earth Orbit Inserts 
>2530 Prelaunch Initializatic 
>2626 P32, P72—CSI S-2 

>2070 Service Routines C-6 

>2770 Reentry Control S-25 C-6 

>2430 TVC Start-up, Executive, and Service Routines ENTRY 20 

>2370 DAP Interface and Service Routines ENTRY 18 

>2650 Orbital Parameters Display CALLED 14 

>2650 Orbital Parameters Display CALLED 14 

>2242 R57 Optics Calibration Routine CALLED 5 

>2200 T4RUPT ENTRY 35 

>2630 P34/P74 TPI Targeting ENTRY 24 

>2020 Fresh Start and Restart C-26,6 T-20 

>2680 Thrust Programs (P40, P41) S-20 C-27 

>2070 Service Routines C-6 

>2680 Thrust Programs (P40, P41) S-5 C-4 T-4C 

Z- 2 O 7 O Service Routines C-6 

2-2760 P60's Entry Programs S-8,14,16 C-14 

2-2320 TFFConics C-14 

2-2540 PU Earth Orbit Insertation Monitor C-7 

2-2580 P21 Ground Track Determination C-5 

2-2590 P22 Orbital Navigation S-4 

2-2600 P23 Cislunar Midcourse Navigation S-16 

2-2070 Service Routines C-6 

2-2642 P37 Return To Earth ‘ C-32 

2-2720 P52 IMO Realignment Program S-7 

2-2730 R52, R53, R56 S-5 

2-2760 P60's Entry Programs C-18 

2-2770 Reentry Control C-7 

2-2530 Prelaunch Initialization and Gyro Compassing ENTRY 42 
2-2440 TVC DAP ENTRY 15 
C-2440 TVC DAP ENTRY 11,15 

C-2530 Prelaunch Initialization and Gyro Compassing ENTRY 41 

C-2530 Prelaunch Initialization and Gyro Compassing ENTRY 11 

C-2070 Service Routines C-6 

2-2630 P34/P74 TPI Targeting S-3 C-3 T-3,4,7 

C-2530 Prelaunch Initialization and Gyro Conpassing ENTRY 31 
C-2430 TVC Start-up, Executive, and Service Routines ENTRY 22 
C-2325 Rendezvous Parameters Displays S-5 
C-2O7O Service Routines C-12 

C-2650 Orbital Parameters Display T-12 

C-2325 Rendezvous Parameters Displays CALLED 2 
C-2330 R62 Crew Defined Maneuver (V49) CALLED 2 
C-2360 R64 (R05)—S-Band Antenna CALLED 2 
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FAZAB5 

FRR3 

FINALFLG 


FINETIME 

FIRST FLC 
FTRSTFLG 
FISHCALC 

FIXDELAY 

FPEEFLAG 

FRESHDAP 

FWDFLTR 

FXFX 

F2RT-' 

GAMCOMP 
GAMDIFSW 
GAM DV10 
GENTRAN 


GEOM 

GETESAD 


GET.LVC 

GET+MGA 


GETtlM 

GETX 

GLOCKMON 

GLOKFAIL 

GOESTIMS 

GOINT 

GONEBY 

GONFPAST 


FC-2361 
FC-2550 
FC-2600 
FC-2605 
FC-2020 
FC-2L90 
FC-2235 
FC-26 50 
FC-2650 
FC-2290 
FC-2300 
FC-2626 
FC-2627 
FC-2070 
FC-2630 
FC-2641 
FC-2642 
FC- 2 644 
FC-2530 
FC-2220 
FC-2070 
FC-2680 
FC-2320 
FC-2760 
FC-2060 
FC-2070 
FC-2380 
FC-2440 
FC-2440 
FC-2I20 
FC-2070 
FC-2642 
FC-2300 
FC-2070 
FC-2642 
FC-2550 
FC-2O2O 
FC-2070 
FC-2240 
FC-2683 
FC-2700 
FC-2310 
FC-2320 
FC-2600 
FC-2642 
”0-2641 
FC-2620 
FC-2626 
FC-2641 
FC-2550 
FC-2590 
FC-2310 
FC-2200 
FC-2020 
FC-2530 
FC-2630 
FC-2070 
FC-2770 
FC-2070 
FC-2770 


V89 (R63) CALLED 2 

P20 Rendezvous Navigation CALLED 17 
P23 Cislunar Midcourse Navigation CALLED 5 
Navigation Extended Verbs CALLED 2,6 
Fresh Start and Restart CALLED 33 
Extended Verbs CALLED 2 

IMU Extended Verbs (V4O, V41, V42) CALLED 6 
Orbital Parameters Display CALLED 2 
Orbital Parameters Display CALLED 2 
Integration Initialization CALLED 18 
Orbital Integration ENTRY 28 

P32, P72—CSI S-7 T-3,6 

P33, P73--CDH T—4 

Service Routines C-6 

P34/P74 TPI Targeting T-l 

Common Targeting Subroutines C-14 

P37 Return To Earth S-14 

P38/P78: P39/P79 S-7,9 T-5,6,7, 

Prelaunch Initialization and Gyro Compassing ENTRY < 

P06 GNCS Power Down CALLED 7 

Service Routines C-6 

Thrust Programs (P40, P41) S-32 

TFFConics ENTRY 12 

P60's Entry Programs CALLED 23,24,27 

Service Routines C-6 

DAP Interface Initialization and Phase I ENTRY 6 

TVC DAP ENTRY 4 

TVC DAP ENTRY 4 

AGC Bloch Two Selfcheck ENTRY 10 

Service Routines C-6 

P37 Return To Earth S-20 C-17 

Orbital Integration ENTRY 23 

Service Routines C-6 

P37 Return To Earth ENTRY 23 

P20 Rendezvous Navigation CALLED 18,20 

Fresh Start and Restart CALLED 28 

Service Routines ENTRY 11 

SXTMARK CALLED 5 

Servicer CALLED 4,19 

P47 Thrust Monitor CALLED 7 

Conic Subroutines ENTRY 34 

TFFConics CALLED 12 

P23 Cislunar Midcourse Navigation CALLED 18 

P37 Return To Earth CALLED 7 

Common Targeting Subroutines ENTRY 12 

P30, P31 CALLED 5,9 

P32, P72--CSI CALLED 6 

Common Targeting Subroutines ENTRY 11 

P20 Rendezvous Navigation ENTRY 38 

P22 Orbital Navigation CALLED 12 

Conic Subroutines ENTRY 26 

T4RUPT ENTRY 43 

Fresh Start and Restart T-26,6 

Prelaunch Initialization and Gyro Compassing ENTRY l 
P34/P74 TPI Targeting ENTRY 14 
Service Routines C-6 

Reentry Control S-l0 C-l0 T-ll,28 

Service Routines C-6 

Reentry Control S-6,28 C-12 T-26,29 
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GOODEND 1 
GOPERFl 1 
GOPIN 1 
GOPROG 1 
GOPROG2 ’ 
GOTOPOOH : 
GRRBKFLG ! 
GTSCPSS1 ' 
GOESSW 


gymdifsn fc- 


i ENTRY 


C-3 


IGNFLAG FC- 


IMPOLSW FC- 
I 

IMUBAD I 
IMUCAGE I 
IMOCOARS ! 

I 

IMUFINF I 
IHOFINEK I 
I MUFIN20 I 
IMUMON ] 
IMUOP 1 
IMUPULSE ] 


I MDSE 


IMUSTLLG 1 
IMUZERO ] 
INCORFLG : 


;_2550 P20 Rendezvous Navigation CALLED 34 
>2220 P06 GNCS Power Down CALLED 3 
>2370 DAP Interface and Service Routines ENTRY 3 
>2020 Fresh Start and Restart ENTRY 13 
>2020 Fresh Start and Restart ENTRY 20 
>2020 Fresh Start and Restart ENTRY 24 
>2070 Service Routines C-6 

>2530 Prelaunch Initialization and Gyro Compassing ENTRY 
>2310 Conic Subroutines T-ll,l 

>2070 Service Routines C-6 

>2641 Common Targeting Subroutines S-4 C-6 

2070 Service Routines C-6 

■2760 P60's Entry Programs C-17 

•2780 CM Entry Digital Autopilot S-6 C-6 

■2440 TVC DAP CALLED 2,10 

■2440 TVC DAP CALLED 1,6 

■2450 Stroke Test Package ENTRY 2 
■2450 Stroke Test Package ENTRY 2 
■ 2641 Common Targeting Subroutines ENTRY 4 
■2641 Common Targeting Subroutines ENTRY 4 
■2310 Conic Subroutines ENTRY 21 
-2070 Service Routines C-6 

■2770 Reentry Control S-18 C-6,18 T-17 

■2600 P23 Cislunar Midcourse Navigat: 

■2O2O Fresh Start and Restart S-6 
■2683 Servicer 
-2760 P60's Entry Programs 

■2770 Reentry Control S-ll C-6,11 T-12,24 

-2780 CM Entry Digital Autopilot C-4 1-9 

-2080 Inter-bank Communication ENTRY 4 
-2O2O Fresh Start and Pestart C-26,6 

-2681 Cloktask and Clockjob S-lO C-l0 

-2020 Fresh Start and Restart C-25,6 

-2680 Thrust Programs (P40, P41) S-20 

-2681 Cloktask and Clock-job S-13 T_ 6 

-2630 P34/P74 TPI Targeting ENTRY 20 
2681 Cloktask and Clockjob CALLED 6 
2020 Fresh Start and Restart S-26 C-6 

2680 Thrust Programs (P40, P41) S-17 C-ig r 21 T-21 

-22OO T4R0PT CALLED 35 
-2200 T4H0PT ENTRY 31 

-2235 IMO Extended Verbs (V40, V41, V42) CALLED 5 
-2720 P52 IMO Realignment Program CALLED 23 
-2235 IMU Extended Verbs (V40, V41, V42) CALLED 9 
-2235 IMU Extended Verbs (V40, V41, V42) ENTRY 8 
-2720 P52 IMO Realignment Program CALLED 23 
-2200 T4RUPT ENTRY 25 
-2200 T4RUPT ENTRY 32 

-2235 IMU Extended Verbs (V40, V41, V42) CALLED 9 

-2720 P52 IMU Realignment Program CALLED 26 

-2550 P20 Rendezvous Navigation C-8 

-2O2O Fresh Start and Pestart C-37,6 

-2220 P06 GNCS Power Down C-3 

>2200 T4ROPT C-32 T-34,35 

>2235 IMU Extended Verbs (V4O, V41, V42) CALLED 3,5,9 

>2720 P52 IMU Realignment Program CALLED 23,26 

-2530 Prelaunch Initialization and Gyro Conpassing ENTRY 36 

>2235 IMU Extended Verbs (V40, V41, V42) CALLED 3 

>2550 P20 Rendezvous Navigation S-22,24 C-28 T-24,27.28 

>2590 P22 Orbital Navigation S-14 C-17 T-17 
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10,18 


C-3 


FC-2300 Orbital Integration CALLED 40 
FC-2320 TFFConics CALLED 14 
FC-2605 Navigation Extended Verbs CALLED 4 
FC-2610 Measurement Incorporation CALLED 12 
I NT HA KEO FC-229O Integration Initialization ENTRY 12 
FC-2670 P76 Target Delta V Program CALLED 4 
INTWAKFU FC-2290 Integration Initialization ENTEY 14 
INTWAKEO FC-2320 TFFConics CALLED 14 
INTYPFLG FC-2290 Integration Initialization S-7 

FC-2325 Eendezvous Parameters Displays S-8,9 
FC-2550 P20 Eendezvous Navigation 
FC-2580 P21 Ground Track Determination 
FC-2590 P22 Orbital Navigation C 

FC-2600 P23 Cislunar Midcourse Navigation 
FC-2070 Service Routines C-6 

FC-2630 P34/P74 TPI Targeting S-14 C-14 

FC-2641 Common Targeting Subroutines 
FC-2642 P37 Return To Earth S-42 C-42,43 

FC-2670 P76 Target Delta V Program 
ISHCALL FC-2O8O Inter-bank Communication ENTRY 
ISWRETRN FC-2O8O Inter-bank Communication ENTRY 
ITERATOR FC-2310 Conic Subroutines ENTEY 36 

ITSHICH FC-2545 P17/P77—TPI Search Programs S-lO C-7 

FC-2627 P33, P73—CDH S-4 

FC-2O7O Service Routines C-6 

FC-2630 P34/P74 TPI Targeting S-3 C-3,4 1 

TTDENOM FC-22OO T4R0 PT ENTRY 29 

JETSLECT FC-2380 DAP Interface Initialization and Phase I CALLED 2 
FC-2390 RCS DAP Phase 2 CALLED 11 
FC-2400 RCS DAP Jet Selection Logic ENTRY 1 
FC-2460 Soil Autopilot CALLED 2 
JOBSLEEP FC-2290 Integration Initialization CALLED 10 
JOBHAKE FC-2290 Integration Initialization CALLED 13 
FC-2670 P76 Target Delta V Program CALLED 10 
JSHITCH FC-2300 Orbital Integration S-33 C-8 T-t 

FC-2O7O Service Routines C-6 

KALCMAN3 FC-2340 R60 Attitude Maneuver CALLED 4 
KEPLERN FC-2300 Orbital Integration CALLED 31 
FC-2310 Conic Subroutines ENTRY 4 
KEPPREP FC-2290 Integration Initialization CALLED 9 
FC-2300 Orbital Integration ENTRY 29 
KEYCOM FC-2150 Keyrupt and Oprupt ENTRY 4 
FC-2240 SXTMARK CALLED 4 
KEYRUPT1 FC-2150 Keyrupt and Oprupt ENTRY 3 

KFLAG FC-2545 P17/P77--TPI Search Programs S-4,5 C-4,5 

FC-2O7O Service Routines C-6 

KLEENEX FC-2550 P2O Rendezvous Navigation CALLED 18 
FC-2240 SXTMARK CALLED 8 
FC-2730 R52, R53, H56 CALLED 5 
KHATRIX FC-2390 RCS DAP Phase 2 CALLED 6 

KNOHNFLG FC-2590 P22 Orbital Navigation S-6 C-6 

FC-2O7O Service Routines C-6 

LALOTORV FC-2320 TFFConics CALLED 14 

FC-2540 Pll Earth Orbit Insertation Monitor CALLED 
FC-2590 P22 Orbital Navigation CALLED 23 
FC-2600 P23 Cislunar Midcourse Navigation CALLED 16 
FC-2720 P52 IMU Realignment Progran CALLED 8 
FC-2730 R52, R53, R56 CALLED 8 
LAMBERT FC-2310 Conic Subroutines ENTRY 14 

FC-2641 Common Targeting Subroutines CALLED 6 
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ENTRY 35 


CH Entry Digital Aul 
P2L Ground Track Del 
P 22 Orbital Navigation CALLED 7,20 
p 37 Return To Earth CALLED 33 
P52 IHD Realignment Program CALLED 7 
P60>s Entry Programs CALLED 18 
V89 (R63) CALLED 4 

PL7/P77—TPI Search Programs CALLED 3,8 
Extended Verbs CALLED 4 
R52, R53, R56 CALLED 8 
Integration Initialization ENTRY 6 
Rendezvous Parameters Displays CALLED 7,10 
Common Targeting Subroutines CALLED 15 
PI7/P77—TPI Search Programs CALLED 3 
Common Targeting Subroutines ENTRY 15 
Prelaunch Initialization and Gyro Compassinc 
R60 Attitude Maneuver CALLED 8 
Orbital Integration CALLED 44 

. l ENTRY 1 

lation ENTRY 1 
: ENTRY 1 

Prelaunch Initialization and Gyro Compassinc 
P52 IMU Realignment Program CALLED 7 
P52 IMU Realignment Program CALLED 8 
Integration Initialization S-5 C-| 

P20 Rendezvous Navigation 
P38/P78: P39/P79 CALLED 12 
TVC Start-up, Executive, anc 
ization C 




Int< 


(263) CALLED 3 

Rendezvous Navigation CALLED 3,11,19,20 


S36 (VgO) CALLED 3 

P35-P75 TPM Targeting CALLED 1 

Orbital Parameters Display CALLED 6 


R52, R53, R56 CALLED 6,9 
P52 IMU Realignment Program ENTRY 1 
Keyrupt and Uprupt CALLED 3,5 
P30, P31 CALLED 3 

-- .ting ENTRY 14,15 
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MARKCONT 

MARKDIF 

MARKDISP 

MARKINDX 
MARKIT 
MARK RUPT 
MARK2 
MASSPROP 


MATMOVE 

MATRXJOB 

MAXCHK 

MAXDBFLG 


HIDAVFLG 

MIDFLAG 

MIDGIM 

MIDTOAVI 

MIDTOAV2 

MIDIFLAG 


M KOVFLAG 
MKREJECT 
MKRELEAS 


FC-2600 
FC-2O7O 
FC-2642 
FC-2730 
FC-2760 
FC-2770 
FC-2720 
FC-2360 
FC-2600 
FC-2I90 
FC-2644 
FC-2340 
FC-2550 
FC-2080 
FC-2670 
FC-2720 
FC-2730 
FC-2240 
FC-2240 
FC-2240 
FC-2242 
FC-2720 
FC-2240 
FC-2240 
FC-2240 
FC-2370 
FC-2430 
FC-2O2O 
FC-2680 
FC-2720 
FC-2540 
FC-2620 
FC-2370 
FC-2020 
FC-2O7O 
FC-2641 
FC-2290 
FC-2300 
FC-2070 
FC-2300 
FC-2070 
PC-2620 
FC-2680 
FC-2290 
FC-2680 
FC-2290 
FC-2700 
FC-2760 
FC-2290 
FC-2300 
FC-2O7O 
FC-2290 
FC-2300 
FC-2670 
FC-2070 
FC-2240 
PC-2590 
FC-2240 
FC-2720 
FC-2730 


P23 Cislunar Midcourse Navigation S-5 C-5 

Service Routines C-6 

P37 Return To Earth C-32 

R52, 853, R 56 S-5 

P60's Entry Programs C-18 

Reentry Control C-7 

P52 IMO Realignment Prog: 

R64 (R05)—S-Band Antenni 
P23 Cislunar Midcourse N; 

Extended Verbs CALLED 3 

P38/P78: P39/P79 ENTRY 6 

R60 Attitude Maneuver CALLED 2 

P20 Rendezvous Navigation CALLED 10 

Inter-bank Communication ENTRY 2 

P76 Target Delta V Program CALLED 10 

P52 IMU Realignment Program CALLED 13 

R52, R53, R56 CALLED 6 

SXTMARK ENTRY 5 

SXTMARK ENTRY 9 

SXTMARK CALLED 5 

R57 Optics Calibration Routine ENTRY 4 
P52 IMU Realignment Program S-18 
SXTMARK ENTRY 9 
SXTMARK ENTRY 4 
SXTMARK ENTRY 6 

DAP Interface and Service Routines CALLED 9 

TVC Start-up, Executive, and Service Routines ENTRY 23 

Fresh Start and Restart CALLED 31 

Thrust Programs (P40, P41) CALLED 25 

p52 IMU Realignment Program ENTRY 27 

Pll Earth Orbit Insertation Monitor ENTRY 7 

P30, P31 CALLED 4,8 

DAP Interface and Service Routines S-8 C-8 

Fresh Start and Restart C-6 T-25 

Service Routines C-6 

Common Targeting Subroutines S-12 C-ll 

Integration Initialization S-20 

Orbital Integration C-40 T-32 

Service Routines C-6 

Orbital Integration S-3 C-3 T-6,10,38,41 

Service Routines C-6 

P30, P31 CALLED 8 

Thrust Programs (P40, P41) CALLED 34,36 

Integration Initialization ENTRY 19 

Thrust Programs (P40, P41) CALLED 12 

Integration Initialization ENTRY 19 

P47 Thrust Monitor CALLED 3 
P60*s Entry Programs CALLED 19 
Integration Initialization S-19 C-19 

Orbital Integration 


Serv 


C-6 


Integration Initialization CALLED 17 

Orbital Integration ENTRY 43 

P76 Target Delta V Program CALLED 4 

Service Routines C-6 

SXTMARK ENTRY 7 

P22 Orbital Navigation CALLED 9 

SXTMARK ENTRY 3 

P52 IMU Realignment Program CALLED 19 
R52, R53, R56 CALLED 5 
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MKRLEES 
MKVB51 
MMDSPLA Y 
MOONFLAG 


MOONFLAG 


MOONTHIS 

MOVEACSM 

MOVEALEM 

MOVEPCSM 

MOVBPLEM 

ME.KLEAN 

MRKIDELG 

MRKNVFLG 

MRUPTFLG 

MWAITFLG 

MXM3 

NBDONLY 

NBSM 

NEEDFLG 

NFEDLER 


NEEDLES3 
N EEDLFLG 


NEGP 

NFWIPLG 


NFWMODFA 

NEWMODKX 


NEWPHASE 
N EWSTATE 
NEXTCOL 
NJETSFLG 


NOACY 

NOATTOFF 

NOBDZ 

NODO^LAG 


FC-2550 

FC-2240 

FC-2020 

FC-2290 

FC-2300 


FC-2325 
FC-2580 
FC-2070 
FC-2630 
FC-2641 
FC-2642 
FC-2670 
FC-2325 
FC-2610 
FC-2610 
FC-2610 
FC-2610 
FC-2610 
FC-2020 
FC-2O7O 
FC-2070 
FC-2O7O 
FC-2070 
FC-2340 
FC-2350 
FC-2060 
FC-2550 
FC-2730 
FC-2380 
FC-2370 
FC-2380 
FC-2430 
FC-2460 
FC-2540 
FC-2370 
FC-2370 
FC-2070 
FC-2680 
FC-2310 
FC-2290 
FC-2300 
FC-2070 
FC-2020 
FC-2O3O 
FC-2 540 
FC-2O3O 
FC-2760 
FC-2030 
FC-2310 
FC-2300 
FC-2370 
FC-2070 
FC-2642 
FC-2680 
FC-2400 
FC-2200 
FC-2400 
FC-2290 


P20 Rendezvous Navigation CALLED 7 
SXTMARK ENTRY 8 

Fresh Start and Restart CALLED 21 

Integration Initialization S-5,14,21 C-5,14 T- 5 

Orbital Integration S-44 C-44 T-11,13,15 

31,40,41,44 
45 

Rendezvous Parameters Displays S-8,9 C-8,9 

P21 Ground Track Determination S-4 C-3 

Service Routines C-6 

P34/P74 TPI Targeting S-14 C-14 

Common Targeting Subroutines S-7 C-7 

P37 Return To Earth C-43 

P76 Tarqet Delta V Program S-3 C-3 

Rendezvous Parameters Displays 

Measurement Incorporation T-iC 

Measurement Incorporation CALLED 11 

Measurement Incorporation CALLED 11 

Measurement Incorporation CALLED 10 

Measurement Incorporation CALLED 10 

Fresh Start and Restart ENTRY 7 

Service Routines C-6 

Service Routines C-6 

Service Routines C-6 

Service Routines C-6 

R60 Attitude Maneuver CALLED 6,7 

Maneuver Calculations and Steering ENTRY 25 

Waitlist CALLED 20 

P20 Rendezvous Navigation CALLED 38 
R52, R53, R56 CALLED 13 

DAP Interface Initialization and Phase I 

DAP Interface and Service Routines ENTRY 20 

DAP Interface Initialization and Phase I CALLED 5 

TVC Start-up, Executive, and Service Routines CALLED 7,11 

Roll Autopilot CALLED 5 

Pll Earth Orbit Insertation Monitor CALLED 4,16,17,20,21 

DAP Interface and Service Routines ENTRY 21 

DAP Interface and Service Routines S-19 C-18 


Serv 




C-6 

1-12,13 


C-12 


: Programs (P40, P41) 

Conic Subroutines ENTRY 21 
Integration Initialization S-8 
Orbital Integration C-6 

Service Routines C-6 

Fresh Start and Restart CALLED 42 
Phase Table Maintenance ENTRY 2 
Pll Earth Orbit Insertation Monitor CALLED 4 
Phase Table Maintenance ENTRY 2 
P60's Fntry Programs CALLED 5,10,12,13,15,16 
Phase Table Maintenance ENTRY 4 
Conic Subroutines ENTRY 35 
Orbital Integration ENTRY 35 
DAP Interface and Service Routines S-15 
Service Routines C-6 

P37 Return To Earth 
Thrust Programs (P40, P41) 

RCS DAP Jet Selection Logic ENTRY 8 
T4RUPT CALLED 34,35 

RCS DAP Jet Selection Logic ENTRY 6 
Integration Initialization S-3 C-4 
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NODOPOl 

NOEBANK 

NOREHOR 

NORFHOR 

NORMLIZE 

NORMSW 


NOEMUNI' 1 ’ 

NORMUNXl 

NOSWITCH 

N02Y 

N KMIDFLG 
NPMNVFLG 
NFOPTFLG 
NWAITFLG 
N220RN17 


OPTMODES 

OPTMON 

OPTNSW 

OPTSTALL 

OPTTEST 

ORBWFLAG 


ORDERSW 

ORIGCHNG 

OTHPREC 

OVERFFIX 

PARAN 

PASSIVE 

PCOPY 

PDSPFLAG 


FC-2020 
FC-2140 
FC-2220 
FC-2670 
FC-2780 
FC-2540 
FC-2120 
FC- 2 O 7 O 
FC-2600 
FC-2540 
FC-2683 
FC-2310 
FC-2620 
FC- 2 O 7 O 
FC-2641 
FC-2642 
FC-2680 
FC-2I00 
FC-2100 
FC- 2 O 7 O 
FC-2770 
FC-2400 
FC- 2 O 7 O 
FC- 2 O 7 O 
FC- 2 O 7 O 
FC- 2 O 7 O 
FC-2370 
FC-2380 
FC-2070 
FC-2070 
FC-2200 
FC-2070 
FC-2644 
FC-2730 
FC-2200 
FC-2290 
FC-2300 
FC-2550 
FC-2590 
FC-2600 
PC-2605 
FC- 2 O 7 O 
FC-2310 
FC- 2 O 7 O 
FC-2300 
FC-2631 
FC-2650 
FC-2650 
FC-26 70 
FC-2530 
FC-2310 
FC-2642 
FC-2626 
FC-2627 
FC-2430 
FC-2440 
FC-2440 
FC-2340 
FC-2550 
FC-2070 


C-12 


C-33 


Fresh Start and Restart c "37,6 

Alarm and Abort 
P06 GNCS Power Down S-2 
P76 Tarqet Delta V Prog: 

CM Entry Digital Autopilot S-5 
PU Earth Orbit Insertation Monitor S-4 
AGC Block Two Selfcheck ENTRY 6 
Service Routines C-6 

P23 Cislunar Midcourse Navigation S-6 
PH Earth Orbit Insertation Monitor CALLED 9 
Servicer ENTRY 4 
Conic Subroutines 
P30, P31 C-7 

Service Routines C-6 

Common Targeting Subroutines S-5 c- 4 

P 37 Return To Earth C-14 

Thrust Programs (P 40 , P41) 

RTB Op Codes ENTRY 15 
RTB Op Codes ENTRY 15 
Service Routines C-6 

Reentry Control S-19 C-6,30,31 T- 3 O 

RCS DAP Jet Selection Logic ENTRY 10 
Service Routines C-6 

Service Routines C-6 

Service Routines C-6 

Service Routines C-6 

DAP Interface and Service Routines S-19 
DAP Interface Initialization and Phase I 
Service Routines C-6 

Service Routines S-13 
T 4 ROPT ENTRY 11 

Service Routines C-6 

P38/P78: P39/P79 S-4 C-4 

R52, R53, R56 CALLED 11 
T4P0PT ENTRY 6 
Integration Initialization 
Orbital Integration 
P20 Rendezvous Navigation 
P22 Orbital Navigation 
P23 Cislunar Midcourse Navigal 

Navigation Extended Verbs c-s, f 

Service Routines C-6 

Conic Subroutines T-36,37 

Service Routines C-6 

Orbital Integration ENTRY 44 
R36 (V 9 O) CALLED 4 

Orbital Parameters Display CALLED 7 
Orbital Parameters Display CALLED 7 
P76 Target Delta V Program CALLED 2 

Prelaunch Initialization and Gyro Compassing ENTRY 36 

Conic Subroutines ENTRY 33 

P 37 Return To Earth CALLED 35 

P32, P72--CSI CALLED 3 

P33, P73—CDH CALLED 2 

TVC Start-up, Executive, and Service Routines CALLED 19 
TVC DAP ENTRY 8 
TVC DAP ENTRY 8 

R60 Attitude Maneuver S-8 T-4,8 

P20 Rendezvous Navigation S-lO C-lO T-34 

Service Routines C-6 


C- 37 

C-22 

C-39 


C- 19 


T-11,18 



T-22 


T-5 




T-14,15 
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PERIAPO FC-2545 
FC-2626 
FC-2641 
PFRIAPOI FC-2620 
PFRIAPOl FC-2626 
FC-2630 
FC-2641 
FC-2644 
PFAILOK FC-2200 
PFRATFLG FC-2O7O 
FC-2680 
FC-2720 
PHASCHNG FC-2030 
PICAPAR FC-2720 
PINRRFLG FC-2O7O 
PINBRNCH FC-2370 
FC-2605 
PIPACHK FC-2530 
PIPASR FC-2683 
PIPATASK FC-2530 
PIPFAIL FC-2200 
PIPFREE FC-2683 
PIPJOBB FC-2530 
PITCHDAP FC-2440 
FC-2440 
PITCHTIM FC-2400 
PLANET FC-2720 
POINTAXS FC-2600 
POLY FC-2310 

FC-2642 
PCODOO FC-2300 
FC-2060 
FC-2140 
POOFLAG FC-2290 
FC-2300 
FC-2020 
POOKLEAN FC-2020 
POSN17C FC-2530 
POSTAND FC-2220 
POSTBURN FC-2630 
POSTJUMP FC-2080 
P0ST41 FC-2630 

FC-2681 
POWRSEPS FC-2540 
PRECIFLG FC-2300 
FC-2O7O 
FC-2290 
PRECOMP FC-2440 
FC-2440 
PREC/TT FC-2644 
PRECSET FC-2626 
FC-2630 
FC-2640 
FC-2641 
FC-2644 
PREClOO FC-2642 
PREREAD FC-2680 
FC-2683 
FC-2700 
FC-2760 


PI7/P77—TPI Search Programs CALLED 9 

P32, P72—CSI CALLED 13 

Common Targeting Subroutines ENTRY 13 

P30, P3L CALLED 4,8 

P32, P72—CSI CALLED 16 

P34/P74 TPI Targeting CALLED 5 

Common Targeting Subroutines ENTRY 13 

P38/P78; P39/P79 CALLED 7 

T4RUPT CALLED 37 

Service Routines C-6 

Thrust Programs (P40, P41) S-6 

P52 IMU Realignment Program C-4,20 

Phase Table Maintenance ENTRY 5 

P52 IMU Realignment Program ENTRY 13 

Service Routines C-6 

DAP Interface and Service Routines CALLED 3 

Navigation Extended Verbs CALLED 2,6,7 

Prelaunch Initialization and Gyro Compassing ENTRY 

Servicer ENTRY 9 

Prelaunch Initialization and Gyro Compassing ENTRY 
T4RUPT ENTRY 41 
Servicer CALLED 26 

Prelaunch Initialization and Gyro Compassing ENTRY 
TVC DAP ENTRY 2 
TVC DAP ENTRY 2 

RCS DAP Jet Selection Logic ENTRY 11 
P52 IMU Realignment Program CALLED 18,19 
P23 Cislunar Midcourse Navigation ENTRY 13 
Conic Subroutines CALLED 25,28 
P37 Return To Earth CALLED 4,6,11 
Orbital Integration CALLED 22 
Waitlist CALLED 9 
Alarm and Abort ENTRY 5 
Integration Initialization S-3 
Orbital Integration 

Fresh Start and Restart C-26,f 

Fresh Start and Restart ENTRY 7 
Prelaunch Initialization and Gyro Compassing ENTRY 
P06 GNCS Power Down ENTRY 4 
P34/P74 TPI Targeting ENTRY 29 
Inter-bank Communication ENTRY 2 
P34/P74 TPI Targeting ENTRY 30 
Cloktask and Clockjob CALLED 5 
Pll Earth Orbit Insertation Monitor CALLED 11 
Orbital Integration C-4O 

Service Routines C-6 

Integration Initialization S-4,6,8 C-4 

TVC DAP ENTRY 7 
TVC DAP ENTRY 7 
P38/P78; P39/P79 ENTRY 11 
P32, P72—CSI CALLED 9 
P34/P74 TPI Targeting CALLED 4 
P35-P75 TPM Targeting CALLED 1 
Common Targeting Subroutines ENTRY 15 
P38/P78; P39/P79 CALLED 10,11 
P37 Return To Earth ENTRY 34 
Thrust Programs (P4O, P41) CALLED 15 
Servicer ENTRY 2 
P47 Thrust Monitor CALLED 4 
P60's Entry Programs CALLED 20 


T-5 


T-5 
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PREREAD1 FC-2540 
FC-2683 
PRESWTCH FC-2430 
PREVGAM FC-2320 
FC-2760 
PRE40.6 FC-2680 

FC-2681 
PFFTRKAT FC-2361 
FC-2550 
FC-2070 
FC-2190 
PPIOCHNG FC-2340 
FC-2370 
FC-2550 
FC-2650 
FC-2650 
FC-2700 
PRIODFLG FC-2070 
PRIODSPR FC-2140 
PRIOLAPM FC-2140 
PROCKEY FC-2200 
PROG20 FC-2550 
PROG21 FC-2580 
PFOG22 FC-2590 
PROG52 FC-2720 
PRONVFIG FC-2070 
PROOT FC-2530 
FC-2 540 
PTOACSM FC-2290 
PTOALEM FC-2290 
PULSEIMU FC-2100 
Pll FC-2540 

P17 FC-2545 

P17.1 FC-2545 

P 17.2 FC-2545 

P17-3 FC-2545 

P20FLGON FC-2545 
FC-2627 
FC-2630 
FC-2640 
FC-2644 
P21FLAG FC-2580 
FC-2020 
P22MKFLG FC-2590 
FC-2O7O 
P22SUBP5 FC-2600 
P23 FC-2600 

P3XORP7X FC-2626 
P30 PC-2620 

P30/P31 FC-2620 

P31 FC-2620 

P 32 FC-2626 

P33 FC-2627 

P34 FC-2630 

P35 FC-2640 

P37 FC-2642 

P38 FC-2644 

P 39 FC-2 644 

P39/79SW FC-2070 
FC-2 644 


Pll Earth Orbit Insertation Monitor CALLED 4 
Servicer ENTRY 3 

TVC Start-up, Executive, and Service Routines ENTRY 

TFFConics ENTRY 11 

P60's Entry Programs CALLED 25,28 

Thrust Programs (P40, P41) ENTRY 44 

Cloktask and Clockjob CALLED 13 

V 89 (R63) S-3 C-3 T-5 

P20 Rendezvous Navigation S-3 

Service Routines C-6 

Extended Verbs S-3 C-3 T-5 

R60 Attitude Maneuver CALLED 8 

DAP Interface and Service Routines CALLED 6 

P20 Rendezvous Navigation CALLED 6,19,31 

Orbital Parameters Display CALLED 2 

Orbital Parameters Display CALLED 2 

P47 Thrust Monitor CALLED 5 

Service Routines C-6 

Alarm and Abort CALLED 10 

Alarm and Abort ENTRY 3 

T4RUPT CALLED 5 

P20 Rendezvous Navigation ENTRY 3 
P21 Ground Track Determination ENTRY 2 
P22 Orbital Navigation ENTRY 2 
P52 IMU Realignment Program ENTRY 1 
Service Routines C-6 

Prelaunch Initialization and Gyro Compassing ENTRY 
Pll Earth Orbit Insertation Monitor CALLED 5 
Integration Initialization ENTRY 5 
Integration Initialization ENTRY 5 
RTB Op Codes ENTRY 12 

Pll Earth Orbit Insertation Monitor ENTRY 3 

P17/P77—TPI Search Programs ENTRY 3 

Pi7/P77—TPI Search Programs ENTRY 3 

Pi7/P77—TPI Search Programs ENTRY 5 

PI7/P77—TPI Search Programs ENTRY 12 

PI7/P77—TPI Search Programs CALLED 3 

P33, P73—CDH CALLED 1 

P34/P74 TPI Targeting CALLED 2 

P35-P75 TPM Targeting CALLED 6 

P38/P78; P39/P79 CALLED 3,9 

P21 Ground Track Determination S-4 

Fresh Start and Restart C-8,26,6 

P22 Orbital Navigation S-9 C-4 

Service Routines C-6 

P23 Cislunar Midcourse Navigation CALLED 6 

P23 Cislunar Midcourse Navigation ENTRY 3 

P32, P72—CSI ENTRY 23 

P30, P31 ENTRY 2 

P30, P31 ENTRY 2 

P30, P31 ENTRY 7 

P32, P72—C SI ENTRY 2 

P33, P73—CDH ENTRY 1 

P34/P74 TPI Targeting ENTRY 2 

P35-P75 TPM Targeting ENTRY 1 

P37 Return To Earth ENTRY 3 

P38/P78; P39/P79 ENTRY 3 

P38/P78; P39/P79 ENTRY 9 

Service Routines C-6 

P38/P78: P39/P79 S-9 T-6,8 


37 


T-3 
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P40CNV85 FC-2680 Thrust Programs (P40, P41) CALLED 11 
FC-2681 Cloktask and Clockjob CALLED 4 
P40CSM FC-2630 P34/P74 TPI Targeting ENTRY 4 

P4OPCS FC-2630 P34/P74 TPI Targeting ENTRY 29 

FC-2681 Cloktask and Clockjob CALLED 7 
P41CSM FC-2630 P34/P74 TPI Targeting ENTRY 

P47BODY FC-2700 P47 T- “ 

P47CSM FC-2700 P47 1 

P52LS FC-2720 P52 ] 

P61 FC-2760 P60'£ 

P62 FC-2760 P60'£ 


1 ENTRY 


P76S0D1 FC- 


QOICTRIG I 
QUIKDSP I 
QUIKPFAD I 
QOITFLAG 1 


5ADSTALL 1 
RANGERD 1 
RATELIH 1 
RCSATT I 


RCSDAPON PC- 


RCS8P I 
RDCDUS 1 
READACCS 1 


ENTRY 

irust Monitor ENTRY 
1U Realignment Progre 
Entry Programs ENTRY 
Fntry Programs ENTRY 6 

>2760 P60's Entry Programs ENTRY 30 

>2760 P60's Entry Programs ENTRY 10 

>2760 P60's Entry Programs ENTRY 12 

>2760 P60's Entry Programs ENTRY 13 

>2760 P60's Entry Programs ENTRY 15 

>2760 P60's Fntry Programs ENTRY 16 

>2760 P60 1 s Entry Programs ENTRY 17 

>2760 P60's Entry Programs ENTRY 18 
>2626 P32, P72--CSI ENTRY 2 
>2627 P33, P73--CDH ENTRY 1 
1-26 30 P34/P74 TPI Targeting ENTRY 2 
:-2640 P35-P75 TTM Targeting ENTRY 1 
•2670 P76 Target Delta V Program ENTRY 2 

•2670 P76 Target Delta V Program ENTRY 3 

•2545 PI7/P77—TPI Search Programs ENTRY 3 
■2644 P38/P78; P39/P79 ENTRY 3 
•2644 P38/P78: P39/P79 ENTRY 9 
■2325 Rendezvous Parameters Displays CALLED 5 
•2360 R64 (R05)—S-Band Antenna CALLED 4 
-2550 P20 Rendezvous Navigation CALLED 14 

■2190 Extended Verbs CALLED 4 

•2700 P47 Thrust Monitor CALLED 8 
•2681 Cloktask and Clockjob CALLED 4 
■2200 T4RtIPT ENTRY 46 
■2683 Servicer ENTRY 15 
■2300 Orbital Integration 
■2O7O Service Routines C-6 

■2290 Integration Initialization 
■2550 P20 Rendezvous Navigation CALLED 32 
•2550 P20 Rendezvous Navigation ENTRY 32 
-2460 Roll Autopilot ENTRY 4 

•2370 DAP Interface and Service Routines CALLEI 
-2380 DAP Interface Initialization and Phase I 
■2390 PCS DAP Phase 2 CALLED 2,3 
■2400 PCS DAP Jet Selection Logic CALLED 16 
-2370 DAP Interface and Service Routines ENTRY 
-2380 DAP Interface Initialization and PI ~ ' 

-2460 Roll Autopilot CALLED 2 
■2020 Fresh Start and Restart CALLED 31 
-2680 Thrust Programs (P40, P41) CALLED 25 
-2681 Cloktask and Clockjob CALLED 9,13 
-2370 DAP Interface and Service Routines ENTRY 4 
-2350 Maneuver Calculations and Steering S-l0 C-26 

-2380 DAP Interface Initialization and Phase I S-2,3,8,5 
-2400 RCS DAP Jet Selection Logic S-17 C-16 

■2540 PH Earth Orbit Insertation Monitor S-4,17,20 
-2380 DAP Interface Initialization and Phase I ENTRY 2 
-2720 P52 IMU Realignment Program ENTRY 27 
-2683 Servicer ENTRY 5 
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READCDOK FC-2: 

FC-2; 

RFADPIPS FC-2] 
RECT. 1 FC-2( 

RECTIFY FC-2; 


REDO I 
REDORCS I 
REDOSAT 1 

REDOTVC I 
REEFLG I 
RFFAZElO I 
REFSMFLG I 


REI NTFLG FC- 


RENDWFLG FC- 


REPLACER I 
RFPLACEY I 
REP 11 l 
REREADAC ? 
RESETX2 I 
RFSTART5 I 
RETROFLG I 


RLI"TEST FC-2440 
FC-2440 
RNDREFDR FC-2200 
RNDVZFLG FC-2550 
FC-2590 
FC-2600 
FC-2020 
FC-2200 
FC-2220 
FC-2683 
RNGSCFLG FC-2070 


R60 Attitude Maneuver CALLED 5 

Maneuver Calculations and Steering ENTRY 24 

RT8 Op Codes ENTRY 4 

P23 Cislunar Midcourse Navigation ENTRY 17 
Orbital Integration ENTRY 43 
Measurement Incorporation CALLED 11 
Integration Initialization CALLED 8,9 
Integration Initialization CALLED 14 
Orbital Integration ENTRY 40 
Integration Initialization CALLED 9 

Prelaunch Initialization and Gyro Compassing ENTRY 31 

DAP Interface Initialization and Phase I ENTRY 2 

DAP Interface and Service Routines CALLED 5 

Pll Earth Orbit Insertation Monitor ENTRY 20 

TVC Start-up, Executive, and Service Routines ENTRY 18 

P52 IMU Realignment Program T-20 

P60's Fntry Programs CALLED 13 

Pll Earth Orbit Insertation Monitor S-8 

P20 Rendezvous Navigation T-6,31 

P23 Cislunar Midcourse Navigation 
P3O, P31 T-5,9 


C-32,33 


P32, P7 2—CSI 
T4R0PT 

P06 GNCS Power Down C-3 

P52 IMO Realignment Program S-4,5 
Orbital Integration S-33,38 
Measurement Incorporation S-7 
Fresh Start and Restart C- 

Alarm and Abort C-12 

Integration Initialization 
P76 Target Delta V Program S-4 
Fresh Start and Restart CALLED 32,37,42 
Service Routines C-6 

Reentry Control S-9 C-6 

Orbital Integration C-37 

P20 Rendezvous Navigation S-23 
P22 Orbital Navigation C-; 

P23 Cislunar Midcourse Navigation 
Navigation Extended Verbs 
Service Routines C-6 

Integration Initialization 
RCS DAP Jet Selection Logic 

RCS DAP Jet Selection Logic 

Pll Earth Orbit Insertation Mi 
Servicer ENTRY 12 
Conic Subroutines ENTRY 30 
Fresh Start and Restart ENTRY 
Service Routines 
P37 Return To Earth S-16 
TVC DAP ENTRY 15 


T-6 


ENTRY 19 
ENTRY 19 
Monitor ENTRY 


C- 16 


TVC DAP ENTRY 
T4RUPT CALLED 
P20 Rendezvoi 
P22 Orbital N 


15 


Navigation S-3 
igation 

P23 Cislunar Midcourse Navigation 

Fresh Start and Restart 

T4RUPT C-33 

P06 GNCS Power Down C- 

Servicer 

Service Routines c-6 
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ROLLDAP 

ROLLTIMF : 

ROTA 

ROTATE 

ROUTINEB : 

RPOFLAO 

RPQFLAG 

RP-TO-R 


RTEVN 

RVCON 

RVSW 


R-TO-RP 

R02BOTH 


R22CAFLG 

R23CSM 

R23FLG 


>2430 TVC Start-up, Executive, and Service Routines CALLED 1 

>2460 Roll Autopilot ENTRY 1 

>2400 RCS DAP Jet Selection Logic ENTRY 9 

>2730 R52, R53, R56 ENTRY 10 

>2626 P32, P72—CSI ENTRY 9 

>2070 Service Routines ENTRY 12 

>2070 Service Routines C-6 

>2300 Orbital Integration S-22 T-44 

>2290 Integration Initialization S-8 

>2300 Orbital Integration CALLED 20 

>2 590 P22 Orbital Navigation CALLED 7,14 

'“2290 Integration Initialization CALLED 21 

>2720 P52 TMU Realignment Program CALLED 7 

>2730 R52, R53, R56 CALLED 9 

>2642 P37 Return To Earth ENTRY 28 

>2290 Integration Initialization ENTRY 9 

>2310 Conic Subroutines T-22 

>2545 P17/P77—TPI Search Programs S-6 

>2626 F32, P72—CSI S-13,14 

>2627 P33, P73—CDH C-8 

>2630 P34/P74 TPI Targeting S-4 

1-2070 Service Routines C-6 

>2 642 P37 Return To Earth S-37 C-13,27 

>2300 Orbital Integration CALLED 15 

>2 590 P22 Orbital Navigation CALLED 13,21 

>2360 R64 (B05)—S-Band Antenna CALLED 3 

>2361 v 89 (R63) CALLED 2 

>2550 P20 Rendezvous Navigation CALLED 3 
>2 590 P22 Orbital Navigation CALLED 3 
>2190 Extended Verbs CALLED 2,3 
>2680 Thrust Programs (P40, P41) CALLED 6 
>2700 P47 Thrust Monitor CALLED 3 
>2720 P52 IMU Realignment Program CALLED 1 
>2760 P60's Fntry Programs CALLED 19 
>2550 P20 Rendezvous Navigation S-18 C-18 

C-2O2O Fresh Start and Restart C-8,36,6 

>2550 P20 Rendezvous Navigation ENTRY 19 
C-2O7O Service Routines C-6 

C-2550 P20 Rendezvous Navigation ENTRY 18 
>2550 P20 Rendezvous Navigation S-17 >17 

C-2O7O Service Routines C-6 

C-2600 P23 Cislunar Midcourse Navigation ENTRY l0 
C-2325 Rendezvous Parameters Displays S-2 
C-2O7O Service Routines C-6 

C-2631 R36 (V90) ENTRY 3 

>2720 P52 IMU Realignment Program ENTRY 18 
C-2550 P20 Rendezvous Navigation CALLED 7 
>2 590 P22 Orbital Navigation CALLED 4 
>2600 P23 Cislunar Midcourse Navigation CALLED 8 
>2720 P52 IMO Realignment Program CALLED 19 
>2730 R52, R53, R56 ENTRY 2 

>2600 P23 Cislunar Midcourse Navigation CALLED 4 
>27 30 R 52, R53, R56 ENTRY 11 
C-2O7O Service Routines C-6 

C-7730 P 52, R53, R 56 S-ll T-3 

>2720 P52 IMO Realignment Program ENTRY 26 
>2720 P52 IMU Realignment Program CALLED 19 
>2730 R 52, R 53, R56 ENTRY 14 

>2600 P23 Cislunar Midcourse Navigation CALLED 4,8 
>2242 P57 Optics Calibration Routine ENTRY 2 


T-17,13,25 
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R57FLAG FC-2600 
FC-2070 
R60CSM FC-2330 
FC-2340 
FC-2361 
FC-2550 
FC-2600 
FC-2190 
FC-2680 
R60FLAG FC-2O7O 
R61CSM FC-2550 
FC-2730 
R62DISP FC-2330 
R63 FC-2361 

FC-2550 
FC-2190 
SATSTICK FC-2540 
SATSTKON FC-2370 
FC-2540 
SAV2CFLG FC-2600 
FC-2070 
SBANDANT FC-2360 
SCALPREP FC-2220 
SCNDSOL FC-2626 
SELECTMTJ FC-2626 
FC-2627 
FC-2630 
FC-2640 
FC-2641 
FC-2 644 
SELFCHK FC-2080 
FC-2120 
SERVEXIT FC-2683 
FC-2700 
SERVICER FC-2683 
SERVNOUT FC-2760 
SETCOARS FC-2200 
SETGWLST FC-2530 
SFTINTG FC-2600 
SETISSW FC-2200 
SETJTAG FC-2683 
SETMAXDB FC-2370 
FC-2630 
FC-2020 
SETMINDB FC-2370 
FC-26 30 
FC-2020 
SETRE FC-2590 
SFTT5 FC-2380 
SETVOARS FC-2020 
SET1/PDT FC-2720 
SGN AGREE FC-2300 
FC-2100 
FC-2631 
SHIFTR1 FC-2641 

SHORTMP FC-2220 
SHOW FC-2530 

SIGNHPAC FC-2300 
FC-2320 
FC-2350 


P23 Cislunar Midcourse Navigation S-8 C-3,9 

Service Routines C-6 

R62 Crew Defined Maneuver (V49) CALLED 3 
R60 Attitude Maneuver ENTRY 2 

V 89 (R63) CALLED 3 

P20 Rendezvous Navigation CALLED 10 

P23 Cislunar Midcourse Navigation CALLED 8 

Extended Verbs CALLED 3 

Thrust Programs (P40, P41) CALLED 8 

Service Routines C-6 

P20 Rendezvous Navigation ENTRY 10 

R52, R53 / R 56 CALLED 4 

R62 Crew Defined Maneuver (V49) ENTRY 3 

V 89 (R63) ENTRY 4 

P20 Rendezvous Navigation CALLED 11 
Extended Verbs ENTRY 4 

Pll Earth Orbit Insertation Monitor ENTRY 21 

DAP Interface and Service Routines ENTRY 5 

Pll Earth Orbit Insertation Monitor ENTRY 19 

P23 Cislunar Midcourse Navigation S-9 C-4 

R64 (R05)—S-Band Antenna ENTRY 3 

P06 GNCS Power Down ENTRY 7 

P32, P72—CSI ENTRY 21 

P32, P72—CSI CALLED 2 

P33, P73—CDH CALLED 1 

P34/P74 TPI Targeting ENTRY 17 

P35-P75 TPM Targeting CALLED 1 

Common Targeting Subroutines ENTRY 14 

P38/P78; P39/P79 CALLED 4,9 

Inter-bank Communication ENTRY 3 

AGC Block Two Selfcheck ENTRY 2 

Servicer ENTRY 27 

P47 Thrust Monitor CALLED 7 

Servicer ENTRY 16 

P60's Entry Programs CALLED 18 

T4ROPT CALLED 43 

Prelaunch Initialization and Gyro Compassing ENTRY 14 
P23 Cislunar Midcourse Navigation ENTRY 14 
T4RUPT ENTRY 30 
Servicer CALLED 7 

DAP Interface and Service Routines ENTRY 24 

P34/P74 TPI Targeting ENTRY 25 

Fresh Start and Restart CALLED 25 

DAP Interface and Service Routines ENTRY 24 

P34/P74 TPI Targeting ENTRY 7 

Fresh Start and Restart CALLED 25 

P22 Orbital Navigation CALLED 24 

DAP Interface Initialization and Phase I ENTRY 2 

Fresh Start and Restart CALLED 19 

P52 IMU Realignment Program CALLED 23 

Orbital Integration CALLED 4 

RTB Op Codes ENTRY 5 

R36 (V90) CALLED 6 

Common Targeting Subroutines ENTRY 10 
P06 GNCS Power Down CALLED 5 

Prelaunch Initialization and Gyro Compassing ENTRY 25 
Orbital Integration CALLED 5 
TFFConics CALLED 9 

Maneuver Calculations and Steering CALLED 7,16,17,18,19,20 
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SKIPVHF 


T-34 


SLOHFLG 
S MALLM P 


FC-2100 
FC-2550 
FC-2020 
FC-2020 
FC-2310 
FC-20 70 
FC-2O7O 
FC-2642 
FC-2370 
FC-2390 
FC-2550 


FC-2 


SOURCFLG 

SPCOS 

SPSIN 

SPSO'F 


SR52. 1 

STABLISF 

STARINP 


STATINT 

STATINT1 

STEERING 

STEERSW 


STPKTST1 

STROKON 

STROLLSH 


FC-2070 
» FC-2530 
FC-2530 
FC-2120 
! FC-2550 

FC-2070 
FC-2I10 
FC-21I0 
FC-2630 
FC-2020 
FC-2681 
FC-2650 
FC-2650 
FC-2730 
FC-2370 
FC-2720 
FC-2760 
FC-2020 
FC-2020 
FC-2020 
FC-2300 
FC-2550 
FC-2590 
FC-2600 
FC-2070 
FC-2I40 
FC-2290 
FC-2290 
FC-2290 
FC-2683 
FC-2020 
FC-2680 
FC-2681 
f FC-2370 
FC-2390 
FC-2540 
! FC-2370 
FC-2390 
FC-2020 
FC-2070 
! FC-2350 
FC-2370 
FC-2550 
FC-2020 
FC-2450 
FC-2450 
FC-2020 


RTB Op Codes ENTRY 14 

P20 Rendezvous Navigation C-32 

Fresh Start and Restart S-8 C-6 

Fresh Start and Restart ENTRY 2 

Conic Subroutines S-l0,14 C-36 T-12,18,36 

Service Routines C-6 

Service Routines C-6 

P37 Return To Earth S-4 C-4 T-20 

DAP Interface and Service Routines ENTRY 28 

RCS PAP Phase 2 CALLED 10 

P20 Rendezvous Navigation CALLED 13 

Conic Subroutines S-12,19,21,23 C-10,14,24 

Service Routines C-6 

Prelaunch Initialization and Gyro Compassing ENTRY 37 
Prelaunch Initialization and Gyro Compassing ENTRY 37 
AGC Block Two Selfcheck ENTRY 13 

P20 Rendezvous Navigation S-33 C-20 T-24,26,27, 

29,30 

Service Routines C-6 

Single Precision Subroutines ENTRY 2 
Single Precision Subroutines ENTRY 2 
P34/P74 TPI Targeting ENTRY 27 
Fresh Start and Restart CALLED 30 
Cloktask and Clockjob CALLED 9,12 
Orbital Parameters Display ENTRY 15 
Orbital Parameters Display ENTRY 15 
R52, P53, R56 ENTRY 6 

DAP Interface and Service Routines ENTRY 2 

P52 IMU Realignment Program S-18 T-19,20 

P60's Fntry Programs CALLED 3 

Fresh Start and Restart ENTRY 8 

Fresh Start and Restart ENTRY 8 

Fresh Start and Restart ENTRY 2 

Orbital Integration S-37 C-3,38 T-38 

P20 Rendezvous Navigation S-7 

P22 Orbital Navigation S-l0,l8 

P23 Cislunar Midcourse Navigation S-14 

Service Routines C-6 

Alarm and Abort C-12 

Integration Initialization S-3 C-3 

Integration Initialization ENTRY 3 

Integration Initialization ENTPY 3 

Servicer CALLED 19 

Fresh Start and Restart C-26,6 

Thrust Programs (P40, P41) S-23 
Cloktask and Clockjob S-10 

DAP Interface and Service Routines ENTRY 23 
RCS DAP Phase 2 CALLED 3,5 

Pll Earth Orbit Insertation Monitor CALLED 21 

DAP Interface and Service Routines C-18 

RCS DAP Phase 2 S-3 

Fresh Start and Restart C-36,6 

Service Routines C-6 

Maneuver Calculations and Steering ENTRY 26 
DAP Interface and Service Routines CALLED 11 
P20 Rendezvous Navigation CALLED 9 
Fresh Start and Restart CALLED 21,25 
Stroke Test Package ENTRY 1 

Stroke Test Package ENTRY 1 

Fresh Start and Restart C-26,6 
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C-21 


STSHOSOM 

SOPDACAL 

STIPERSW 

SURFFLAG 

SVDWNl 

SVDWN2 

S HCALL 
SHICROVR 

SHRETURN 

SHTOVER 


SXTMARK 

SXTNB 


SXTSM 

SYSTSST 


S 17- l 
S 17- 2 
S22- 1 
S30. 1 

531- 1 

532- 1F1 

S32-1F2 
S32-1F3A 

S32-1F3E 
S32/33-X 
S32/33-1 

S32 ,1F3D 
S33/34.1 

333-34.1 
334/35- l 


334/35.2 

S34/35-3 
534/35-4 
S34/35-5 

S3435.25 

S40.1 
S40.13 


FC-2680 
FC-2120 
FC-2080 
FC-2120 
FC-2080 
FC-2290 
FC-2325 
FC-2290 
FC-2610 
FC-2290 
FC-2610 
FC-2080 
FC-2370 
FC-2430 
FC-2080 
FC-2430 
FC-2020 
FC-2070 
FC-2730 
FC-2325 
FC-2550 
FC-2730 
FC-2720 
FC-2730 
FC-2530 
FC-2540 
FC-2700 
FC-2545 
FC-2545 
FC-2590 
FC-2620 
FC-2620 
FC-2626 
FC-2O7O 
FC-2626 
FC-2070 
FC-2626 
FC-2070 
FC-2070 
FC-2626 
FC-2626 
FC-2627 
FC-2626 
FC-2627 
FC-2630 
FC-2630 
FC-2630 
FC-2640 
FC-2644 
FC-2630 
FC-2640 
FC-26 30 
FC-2630 
FC-2630 
FC-2640 
FC-2630 
FC-2644 
FC-2680 
FC-2630 
FC-2681 


Thrust Programs {P40, P41) S-21 
AGC Bloch Two Selfcheck ENTRY 7 
Inter-bank Communication ENTRY 3 
AGC Block Two Selfcheck CALLED 9 
Inter-bank Communication ENTRY 2 

Integration Initialization T 

Rendezvous Parameters Displays 

Integration Initialization CALLED 5 

Measurement Incorporation CALLED 11 

Integration Initialization CALLED 5 

Measurement Incorporation CALLED ll 

Inter-bank Communication ENTRY 1 

DAP Interface and Service Routines CALLED 2 

TVC Start-up, Executive, and Service Routines ENTRY 28 

Inter-bank Communication ENTRY 1 

TVC Start-up, Executive, and Service Routines S-29 

Fresh Start and Restart C-25,6 

Service Routines C-6 

R52, R53, R56 CALLED 11,14 

Rendezvous Parameters Displays CALLED 6 

P20 Rendezvous Navigation CALLED 38 

R52, R53, R 56 CALLED 13 

P52 IMU Realignment Program CALLED 19 

R 52, R53, R56 ENTRY 13 

Prelaunch Initialization and Gyro Compassing ENTRY 31 
Pll Earth Orbit Insertation Monitor ENTRY 18 
P47 Thrust Monitor CALLED 6 
P17/P77—TPI Search Programs ENTRY 3 
P17/P77—TPI Search Programs ENTRY 6 
P22 Orbital Navigation ENTRY 9 
P30, P31 ENTRY 


P30, P31 ENTRY 7 

P32, P72—CSI C-11,21 

Service Routines C-6 

P32, P72—CSI S-11,21 C-18 

Service Routines C-6 

P32, P72—CSI s-18,19 C-11,21 

Service Routines C-6 

Service Routines C-6 

P32, P72—CSI ENTRY 8 

P32, P72—CSI ENTRY 5 

P33, P73—CDH CALLED 4 

P32, P72—CSI S-11,19 C-18,21 

P33, P73—CDH CALLED 3 

P34/P74 TPI Targeting ENTRY 6 
P34/P74 TPI Targeting ENTRY 6 
P34/P74 TPI Targeting ENTRY 6 
P35-P75 TPM Targeting CALLED 1 
P38/P78; P39/P79 CALLED 11 
P34/P74 TPI Targeting ENTRY 11 
P35-P75 TPM Targeting CALLED 2 
P34/P74 TPI Targeting ENTRY 13 
P34/P74 TPI Targeting ENTRY 16 
P34/P74 TPI Targeting ENTRY 16 
P35-P75 TPM Targeting CALLED 2 
P34/P74 TPI Targeting ENTRY 11 
P38/P78; P39/P79 CALLED 6,10 
Thrust Programs (P40, P41) ENTRY 32 
P34/P74 TPI Targeting ENTRY 17 
Cloktask and Clockjob CALLED 14 


T-12 


T-12,18,21 


T-12,18,21 
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S40. l< 


S40.15 

S40.2.3 
S40.6 
S41- 1 
S41.2 


S50 

S52-2 

S52-3 

561.1 

S 6 1 • 1A 
S61.1C 

561.2 
TARGDRVE 
TARG1FLG 


TARG2FLG 


TAR/EREF 

TASKOVER 

TERMIFLG 

TERMIMFL 

TESTLOOP 

TESTXACT 


TFFCONIC 

TFFCONMU 

TFFRP/RA 

TFF/TRXG 

TFFSH 


FC-2370 
FC-2380 
FC-2460 
FC-2370 
FC-2430 
FC-2680 
FC-2680 
FC-2700 
FC-2370 
FC-2380 
FC-2460 
FC-2720 
FC-2720 
FC-2720 
FC-2760 
FC-2760 
FC-2760 
FC-2760 
FC-2530 
FC-2340 
FC-2550 
FC-2590 
FC-2600 
FC-2020 
FC-2720 
FC-2730 
FC-2590 
FC-2600 
FC-2O7O 
FC-2720 
FC-2730 
FC-2530 
FC-2060 
FC-2070 
FC-2730 
FC-2290 
FC-2300 
FC-2325 
FC-2330 
FC-2360 
FC-2361 
FC-2370 
FC-2605 
FC-2190 
FC-2235 
FC-2631 
FC-2650 
FC-2650 
FC-2320 
FC-2760 
FC-2320 
FC-2650 
FC-2650 
FC-2320 
FC-2650 
FC-2650 
FC-2320 
FC-27 60 
FC-2320 
FC-2070 


DAP Interface and Service Routines ENTRY 17 
DAP Interface Initialization and Phase I CALLED 6 
Roll Autopilot CALLED 6 

DAP Interface and Service Routines ENTRY 17 

TVC Start-up, Executive, and Service Routines CALLED 4, 

Thrust Programs (P40, P41) ENTRY 40 

Thrust Programs (P40, P41) ENTRY 44 

P47 Thrust Monitor ENTRY 8 

DAP Interface and Service Routines ENTRY 13 

DAP Interface Initialization and Phase I CALLED 6 

Roll Autopilot CALLED 6 

P52 IM0 Realignment Program ENTRY 11 

P52 IM0 Realignment Program ENTRY 9 

P52 IMU Realignment Program ENTRY 10 

P60 1 s Entry Programs ENTRY 19 

P60's Entry Programs ENTRY 21 

P60's Entry Programs ENTRY 20 

P60's Entry Programs ENTRY 22 

Prelaunch Initialization and Gyro Compassing ENTRY 43 

R60 Attitude Maneuver T-8 

P20 Rendezvous Navigation S-6 

P22 Orbital Navigation C-7 

P23 Cislunar Midcourse Navigation C-3 

Fresh Start and Restart C-38,6 

P52 IMO Realignment Program S-18 

R52, R53, R56 T-3,4,6 

P22 Orbital Navigation S-7 

P23 Cislunar Midcourse Navigation C-3 

Service Routines C-6 

P52 IMD Realignment Program S-18 

R52, R53, R56 T-6 

Prelaunch Initialization and Gyro Compassing ENTRY 45 

Waitlist ENTRY 18 

Service Routines C-6 

R52, R53, R56 C-2, 12 T-4 

Integration Initialization CALLED 8 

Orbital Integration ENTRY 3 

Rendezvous Parameters Displays CALLED 2 

R62 Crew Defined Maneuver (V49) CALLED 2 

R64 (RO5)—S-Band Antenna CALLED 2 

V89 (R63) CALLED 2 

DAP Interface and Service Routines CALLED 6,10 
Navigation Extended Verbs CALLED 2 
Extended Verbs CALLED 2 

IMU Extended Verbs (V4O, V41, V42) CALLED 4,6,8 
R36 (V90) CALLED 2 

Orbital Parameters Display CALLED 2 
Orbital Parameters Display CALLED 2 
TFFConics ENTRY 3 
P60's Entry Programs CALLED 22 
TFFConics ENTRY 3 

Orbital Parameters Display CALLED 16 
Orbital Parameters Display CALLED 16 
TFFConics ENTRY 4 

Orbital Parameters Display CALLED 16 
Orbital Parameters Display CALLED 16 
TFFConics ENTRY 11 
P60's Entry Programs CALLED 23,27 
TFFConics S-5 C-5 T-5 

Service Routines C-6 
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THISPREC 


TICKTEST 

TIGAVEG 

TIGBLNK 

TIGNOW 

TIGON 

TIG-0 

TIG-5 

TIMERAD 

TIMFRFLG 

TIMESTEP 

TIMETHET 


TIMFLAG 

TIMRFLAG 

TLIM 

TNONTEST 

TORQHF 

TPAGREE 


TRACK FLG 


TPANSANG 

TPANSP1 

TRANSP2 

TPFAILOF 


TRFAILON 

TPH03FLG 

TRUNFLAG 

TTG/0 

TVCDAPON 


FC-2620 
FC-2631 
FC-2650 
FC-2650 
FC-2680 
FC-2650 
FC-2650 
FC-26 30 
FC-2630 
FC-2630 
FC-2700 
FC-26 30 
FC-2630 
FC-2310 
FC-2642 
FC-2620 
FC-2300 
FC-2310 
FC-2545 
FC-2626 
FC-2627 
FC-26 30 
FC-2642 
FC-2644 

FC-2020 
FC-2680 
FC-2200 
FC-2200 
FC-2530 
FC-2220 
FC-2630 
FC-2340 
FC-2545 
FC-2550 
FC-2620 
FC-2626 
FC-2627 
FC-2020 
FC-2200 
FC-2220 
FC-2630 
FC-2640 
FC-2644 
EC-2670 
FC-2720 
FC-2730 
FC- 2 545 
FC-2100 
FC- 2 I 00 
FC-2550 
FC-2605 
FC-2070 
FC-2550 
FC-2070 
FC-2070 
FC-2070 
FC-2730 
FC-2630 
FC-2430 


P30, P3I CALLED 3 
R36 (V9O) CALLED 4 

Orbital Parameters Display CALLED 7 

Orbital Parameters Display CALLED 7 

Thrust Programs (P40, P41) CALLED 38 
Orbital Parameters Display ENTRY 14 

Orbital Parameters Display ENTRY 14 

P34/P74 TPI Targeting ENTRY 15 
P34/P74 TPI Targeting ENTRY 14 
P34/P74 TPI Targeting ENTRY 30 
P47 Thrust Monitor ENTRY 4 
P34/P74 TPI Targeting ENTRY 20 
P34/P74 TPI Targeting ENTRY 16 
Conic Subroutines ENTRY 23 
P37 Return To Earth CALLED 27,37 
P30, P31 S-6,10 C-6,10 

Orbital Integration ENTRY 6 
Conic Subroutines ENTRY 22 
P17/P77—TPI Search Programs CALLED 7 
P32, P72--CSI CALLED 13,14 
P33, P73—CDH CALLED 5 
P34/P74 TPI Targeting CALLED 5 
P37 Return To Earth CALLED 13 
P38/P78; P39/P79 CALLED 11 
Cloktask and Clockjob 

Fresh Start and Restart C-26,6 

Thrust Programs (P40, P41) S-8 C-28,31 

T4R0PT ENTRY 28 
T4R0PT ENTRY 33 

Prelaunch Initialization and Gyro Compassing ENTRY 

P06 GNCS Power Down CALLED 5,6 

Thrust Programs (P40, P41) CALLED 19 

R60 Attitude Maneuver 

Pi7/F77—TPI Search Programs S-3 

P20 Rendezvous Navigation S-3 C-8 

P30, P31 S-2,7 

P32, P72—CSI S-2 

P33, P73—CDH S-l 

Fresh Start and Restart S-39 C-38,6 

T4RUPT C-32,33 


T-8 

T-6,8,17,31 


P06 GNCS Power Down C-3 

P34/P74 TPI Targeting S-2 

P35-P75 TPM Targeting S-l 

P38/P78; P39/P79 S-3 

P76 Target Delta V Program S-2 

P52 IMU Realignment Program C-l 

R52, R53, R56 T-4 

P17/P77—TPI Search Programs ENTRY 14 

RTB Op Codes ENTRY 13 

RTB Op Codes ENTRY 13 

P20 Rendezvous Navigation CALLED 33 

Navigation Ertended Verbs CALLED 7 

Service Routines ENTRY 13 

P20 Rendezvous Navigation CALLED 32 

Service Routines ENTRY 13 

Service Routines C-6 

Service Routines C-6 

R52, R53, R56 S-2,3 C-3 T-3 

P34/P74 TPI Targeting ENTRY 31 

TVC Start-up, Executive, and Service Routines ENTRY I 
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> I CALLED 2 


FC-2680 Thrust Programs (P40, P41) CALLED 22 
TVCEXEC FC-2430 TTC Start-up, Executive, and Service Routines ENTRY 
TVCINITl FC-2430 TVC Start-up, Executive, and Service Routines ENTRY 2 
TVC7.AP FC-2O2O Fresh Start and Restart CALLED 31 
FC-2630 P34/P74 TPI Targeting ENTRY 28 
TVCZAP-1 FC-2681 Cloktask and Clockjob CALLED 5,7 
TWIDDLE FC-2060 Waitlist ENTRY 9 
T3RIJPT FC-2060 Waitlist ENTRY 16 
T4RUPT FC-2200 T4RDPT ENTRY 3 

T5IDL0C FC-2380 DAP Interface Initialization and Phi 
FC-2O2O Fresh Start and Restart ENTRY 17 
T5PHASE FC-2460 Roll Autopilot CALLED 2 
T5PHASE2 FC-2380 DAP Interface Initialization and Phi 
FC-2390 RCS DAP Phase 2 ENTRY 2 
T6SETUP FC-2400 RCS DAP Jet Selection Logic ENTRY 15 
T6START FC-2380 DAP Interface Initialization and Phase I CALLED 7 
FC-2400 RCS DAP Jet Selection Logic ENTRY 17 
FC-2460 Roll Autopilot CALLED 7 
UPACTOFF FC-2550 P20 Rendezvous Navigation CALLED 12 
FC-2020 Fresh Start and Restart CALLED 36 
OPDATFLG FC-2545 P17/P77—TPI Search Programs S-3,4,12,13 C-3,5 

FC-2550 P20 Rendezvous Navigation S-3 c_ 8 

FC-2620 P30, P31 S-2,7 C-2,7 

FC-2626 P32, P72—CSI S-2,3 C-7 

FC-2627 P33, P73 CDH S-4 

FC-2020 Fresh Start and Restart S-39 C-38,6 

FC-2630 P34/P74 TPI Targeting S-2,16 

FC-2640 P35-P75 TPM Targeting S-l 

FC-2644 P38/P78: P39/P79 S-3,6,7 C-7,9 

FC-2720 P52 IMO Realignment Program C-l 

FC-2730 R52, 853, R56 T " 4 

UPENT2 FC-2O7O Service Routines ENTRY 2 

UPFLAG FC-2O7O Service Routines ENTRY 4 

TTPLOCKFL FC-2O7O Service Routines C-6 

FC-2150 Keyrupt and Dprupt S-7 C-8 1-8 

OPROPT FC-2150 Keyrupt and Oprupt ENTRY 5 

'JPSVFLAG FC-2290 Integration Initialization C-15 

UPTMFAST FC-2200 T4R0PT ENTRY 42 

OSEPIOS FC-2290 Integration Initialization ENTRY 21 

USPRCADR FC-2080 Inter-bank Communication ENTRY 5 

VAC5STOR FC-2020 Fresh Start and Restart ENTRY 27 
FC-2140 Alarm and Abort CALLED 5 

VALMIS FC-2530 Prelaunch Initialization and Gyro Compassing ENTRY 
VARALARM FC-2626 P32, P72—CSI CALLED 22 
FC-2140 Alarm and Abort ENTRY 3 
FC-2200 T4R0PT CALLED 30 
FC-2642 P37 Return To Earth CALLED 45 
VARDELAY FC-2060 Waitlist ENTRY 10 

VBCOARK FC-2235 IMO Extended Verbs (V4O, V41, V42) ENTRY 4 

VBZERO FC-2235 IMO Extended Verbs (V4O, V41, V42) ENTRY 

FC-2235 IMO Extended Verbs (V4O, V41, V42) ENTRY 2 

VECPOINT FC-2340 R60 Attitude Maneuver ENTRY 5 

FC-2361 V89 (R63) CALLED 5 
FC-2190 Extended Verbs CALLED 5 
VECSGNAG FC-2100 RTB Op Codes ENTRY 12 
VFCSHIFT FC-2641 Common Targeting Subroutines ENTRY 


10 


C-6 


C-3 


IPFLG FC-2590 P22 Orbital Navigation S-15 











C-36,6 

;-7 C-7 

i Monitor ENTRY 18 


FC-2600 P23 Cislunar Midcourse Navigation S-12 
FC-2610 Measurement Incorporation 
VFNTFLAG FC-?070 Service Routines C-6 

VFRF65 FC-2360 R64 (KOs)—S-Band Antenna ENTRY 2 

VERIFLAG FC-2070 Service Routines C-6 

VFLAG FC-2O7O Service Routines C-6 

FC-2720 P52 IMU Realignment Program S-13,16 
VGAMCALC FC-2320 TFFConics ENTRY 11 

FC-2760 P60's Entry Programs CALLED 25 
VFFRFLAG FC-2550 P20 Rendezvous Navigatioi 
FC-2O2O Fresh Start and Restart 
VHFPFLG FC-2605 Navigation Extended Verb: 

VHHDOT FC-2540 Pll Earth Orbit Insertati 

FC-2683 Servicer CALLED 19 

VINTFLAG FC-2290 Integration Initialization S-4,6,7,16,19 C-4,6<7 
FC-2300 Orbital Integration 

FC-2550 P20 Rendezvous Navigation S-7 C-4,5,21 

FC-2580 P21 Ground Track Determination S-3 C-3 

FC-2590 P22 Orbital Navigation S-l0,18 
FC-2600 P23 Cislunar Midcourse Navigation S-14 
VNDSPLY FC-2644 P38/P78: P39/P79 ENTRY 12 
VNPOOH FC-2626 F32, P72—CSI CALLED 2,4 
FC-2627 P33, P73--CDH CALLED 1 
VN1645 FC-2626 P32, P72—CSI ENTRY 6 

FC-2627 P33, P73—CDH CALLED 1,4 
FC-2630 P34/P74 TPI Targeting CALLED 3 
FC-2640 P35-P75 TPM Targeting CALLED 1,2 
FC-2642 P37 Return To Earth CALLED 14 
V1ST02 FC-21OO RTB Op Codes ENTRY 6 
V1ST02S FC-234O R60 Attitude Maneuver CALLED 7 

FC-2350 Maneuver Calculations and Steering CALLED 10 
FC-2540 Pll Earth Orbit Insertation Monitor CALLED 14 
V2T1OO FC-2642 P37 Return To Earth ENTRY 17 
V37 FC-2O2O Fresh Start and Restart ENTRY 30 

V37FLAG FC-2320 TFFConics T-14 

FC-2325 Rendezvous Parameters Displays 
FC-2O2O Fresh Start and Restart C-6 

FC-2140 Alarm and Abort 1-11 

FC-2683 Servicer S-3 C-26 

V37KLEAN FC-2O2O Fresh Start and Restart ENTRY 7 
V37XEQ FC-2020 Fresh Start and Restart ENTRY 40 
V50M18FL FC-2370 DAP Interface and Service Routines S-18 

FC-2550 P20 Rendezvous Navigation S-3 C-lO 

FC-2O7O Service Routines C-6 

V54F FC-2550 P20 Rendezvous Navigation ENTRY 17 

V565 FC-2550 P20 Rendezvous Navigation ENTRY 8 

V57E FC-2550 P20 Rendezvous Navigation ENTRY 17 

V59FLAG FC-2O2O Fresh Start and Pestart C-26,6 

FC-2242 R57 Optics Calibration Routine S-3 C-5 

V60 FC-2370 DAP Interface and Service Routines ENTRY 18 

V61 FC-2370 DAP Interface and Service Routines ENTRY 18 

V62 FC-2370 DAP Interface and Service Routines ENTRY 19 

763 FC-2370 DAP Interface and Service Routines ENTRY 19 

V79 FC-2370 DAP Interface and Service Routines ENTRY 10 

V82CALL FC-2650 Orbital Parameters Display ENTRY 4 

FC-2650 Orbital Parameters Display ENTRY 3 
V82SMFLG FC-2O7O Service Routines C-6 

FC-2650 Orbital Parameters Display S-6,8,11 C-6,8,1 

FC-2650 Orbital Parameters Display S-8,11 C-8,11 

V82FLAGS FC-2650 Orbital Parameters Display S-lO C-4 


17-26 







V 82PERF 

V 89CALL 
V89PERF 

V9OPERF 

V94FLAG 

V96DNFLG 

V96ONFLG 

V97F 

V97P 

V97T 

V 99E 
V99P 
V99T 

WAITLIST 

WAKFP62 

XDELVFLG 


XDSPFLAG 

YAWDAP 

YAWTIM 

YCOPY 


ZEROICDU 

ZEROING 

ZEROJET 

ZMEASURE 

- ICHK 
I/PIPA 
IST02S 
1TOSIJB 
2EBANK 
2PHSCHNG 
2 VlS TO 
22DSPFLG 

3AXISFLG 


360CHECF 
360SW 
:ELAYJOB 


-2650 Orbital Parameters Display ENTRY 2 

-2650 Orbital Parameters Display ENTRY 2 

-2361 V 89 (R63) ENTRY 2 

-2190 Extended Verbs ENTRY 2 

-2361 V 89 (R63) ENTRY 2 

-2190 Extended Verbs ENTRY 2 

-2631 R36 (V90) ENTHY 2 

-2600 P23 Cislunar Midcourse Navigation S-8 c-3, 

-2O2O Fresh Start and Restart C-25,6 

-2070 Service Routines c-6 

-2290 Integration Initialization c -3 

-2681 Cloktask and Clockjob ENTRY 11 

-2681 Cloktask and Clockjob ENTRY 10 

-2681 Cloktask and Clockjob ENTRY 8 

-2681 Cloktask and Clocklob ENTRY 7 

-2681 Cloktask and Clockjob ENTRY 6 

-2681 Cloktask and Clockjob ENTRY 5 

-2060 Waitlist ENTRY 9 

-2760 P60's Entry Programs ENTRY 9 

-2620 P30, P31 S-1,6 C-l0 

-2626 P32, P72—CSI S-9 

-2627 P33, P73—CDH S-6 

-2O7O Service Routines c-6 

-2630 P34/P74 TPI Targeting C-16 

-2642 P37 Return To Earth C-14 

-2644 P38/P78; P39/P79 C-7 

-2680 Thrust Programs (P4O, P41) 

-2020 Fresh Start and Restart C-24,36,6 

-2440 TVC DAP ENTRY 9 
-2440 TVC DAP ENTRY 6,9 

-2400 RCS DAP Jet Selection Logic ENTRY 13 

■2430 TVC Start-up, Executive, and Service Routines CALLED 

-2440 TVC DAP ENTRY 13 

■2440 TVC DAP ENTRY 13 

■2200 T4RUPT CALLED 34,36 

■2530 Prelaunch Initialization and Gyro Compassing ENTRY 
■2370 DAP Interface and Service Routines CALLED 3,5 
■2540 Pll Earth Orbit Insertation Monitor CALLED 19 
■2600 P23 Cislunar Midcourse Navigation S-17 C-17 

-2O7O Service Routines C-6 

■2120 AGC Block Two Selfcheck ENTRY 16 
■2683 Servicer CALLED 17 
■2100 RTB Op Codes ENTRY 5 
•2100 RTB Op Codes ENTRY 8 
■2120 AGC Block Two Selfcheck ENTRY 6 
2O3O Phase Table Maintenance ENTRY 11 
•2100 RTB Op Codes ENTRY 7 

2590 P22 Orbital Navigation C-16 T 

•2O7O Service Routines c-6 

2330 R62 Crew Defined Maneuver (V49) s-3 

234O R60 Attitude Maneuver C-4 T-, 

2361 V 89 (R63) C-3 

2550 P20 Rendezvous Navigation c-10 

2600 P23 Cislunar Midcourse Navigation C-7 

2O2O Fresh Start and Restart C-26,6 

2190 Extended Verbs C-3 

(P40, P41) C-8 

s ENTRY 30 


>2680 Thrust Progi 
>2310 Conic Subroutines 
>2070 Service Routines 
>2650 Orbital Parametes 


C-6 

; Display CALLED 12 
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